Вопрос пользователя:
Выполнить задания, связанные с 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.