Выполнить , связанные с turbo pascal: 1) какой оператор позволяет менять значения переменных и вычислять значения выражений? 2) выполнить алгоритм при x=345: начало ввод x a=x div 100 b=x div 10 mod 10 c=(a+b)/2 вывод a вывод b вывод c конец 3)
что появится на экране после выполнения фрагмента программы: a: =7; b: =5; a: =a-b; writeln(b-a*2); writeln('a=',a,'b=',b); 4) дана сторона квадрата, найти его периметр. 5) дано трёхзначное число. в нём зачеркнули последнюю справа цифру и
приписали её в начале. найти полученное число. * 4 и 5 решить на языке программирования, используя функции.
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.