1) присвоения :=2)343,5 3) 1a=2 b=5var 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.
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.