1) присвоения :=
2)
3
4
3,5
3) 1
a=2 b=5
var a,x,x1,x2,x3:integer;
Begin
read(a);
writeln('4. s=',4*a);
read(x);
x3:=x mod 10;
x1:=x div 10;
writeln('5. x=',x3*100+x1);
End.
625 Кбайт = 625 * 1000 * 8
ответ : (625 * 1000 * 8) / 128000
8 бит-1байт
делим 98304 на 8,получаем 12,288 кбайт
Бит принят за единицу измерения