Должно быть немного конкретнее. к примеру, число 10 может быть записано в любой системе счисления с алфавитом больше или равным двоичной системе. к примеру, в шестнадцатиричной, так что я буду писать минимальные системы счисления и переводить в восьмиричную, десятиричную и шестнадцатиричную системы. 113: мин = 4; 8 = 27; 10 = 23; 16 = 17; 213q: мин = 27; 8 = 116412; 10 = 40202; 16 = 9d0a; 1a5h: мин = 18; 8 = 21733; 10 = 9179; 16 = 23db; 1001011b: мин = 12; 8 = 210610647; 10 = 35852711; 16 = 22311a7;
Нозадзе_Новиков392
22.03.2021
Var k,n,i,s: integer; beginreadln(k,n); for i: =0 to n do s: =s+k+i; writeln(s)end.var k,n,i,s: integer; beginreadln(k,n); for i: =0 to n do s: =s+k+i; writeln(s/(n+1))end.var r,n,i,p: integer; beginreadln(r,n); p: =1; for i: =0 to r do p: =p*(n+i); writeln(p)end.var r,i,p,x: integer; beginreadln(r); x: =1; for i: =1 to r do begin x: =x*i; p: =p+x; end; writeln(p)end.var r,i,p,x: integer; beginreadln(r); p: =1; for i: =1 to r do begin x: =x+i; p: =p*x; end; writeln(p)end.var m,n,t,i: integer; beginreadln(t); writeln('n': 3,'m': 5); for i: =1 to (t div 2) do begin n: =i*2; m: =sqr(n)-n; writeln(n: 3,m: 5); end; end.var y,m,n,i: integer; x: real; beginreadln(n,m); writeln('y': 3,'x': 10); for i: =1 to m do begin y: =n*i; x: =sqr(y)*(sqr(y)-y)/y; writeln(y: 3,x: 10); end; end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
33 3 3 = 4 (какие арифметические дейстия надо что бы получилось 4
(3*3+3):