1 нужно 48=4+8=12
1991=1+9+9+1=20
182=1+8+2=11
25431=2+5+4+3+1=15
2 нужно если число одно как например 1 7 значит ставится цифра 1 если 10 цифра 2 если 183 цифр 3 1996 цифр 4
ДАЛЬШЕ НЕЗНАЮ СОРИ
6) 11(2) = 3(10), 11(3) = 4(10), 3*4 = 12(10) = 1100(2) = 110(3)
8) 144(16) - наибольшее. Вообще, если написание чисел одинаково, то больше то число, у которого больше основание.
Если еще посчитать надо, то вот.
144(16) = 16^2 + 4*16 + 4 = 256 + 64 + 4 = 324(10)
144(10) = 144(10)
144(8) = 8^2 + 4*8 + 4 = 64 + 32 + 4 = 100(10)
144(6) = 6^2 + 4*6 + 4 = 36 + 24 + 4 = 64(10)
Program qwerty;uses crt, graphabc;var x,x0,y0,k:integer; y:real; beginx0:=320;y0:=240;k:=50;for x:= -320 to 320 do beginif x<0 then y:=x*xelse if (x>=0) and (x<10) then y:=xelse if x>=10 then y:=1/xend;end.
Вы "счетчик" в real объявили, а он должен быть integer
var
a: array [1..10] of integer;
x,i: integer;
begin
writeln('Заполните массив: ');
for i:=1 to 10 do read(a[i]);
x:=a[3];
a[3]:=a[9];
a[9]:=x;
for i:=1 to 10 do write(a[i]:4);
<span>end.</span>