Question

СПАСИТЕ, ЧЕРЕЗ 20 МИНУТ СДАВАТЬ
УМОЛЯЮ, ПОМОГИТЕ, НЕ МОГУ НИЧЕГО НА ДИСТАНТЕ ПОНЯТЬ
Найдите ошибку и запишите в тетрадь строку с исправлением

1. Ввели х=2. После выполнения программы (см. ниже) х стало равно 8.

var х:real;

begin

readln(x);

х:=x*x;

х:=x*x*x;

writeln(x);

end.

2. Программа для вычисления среднего возраста детей.

var z1,z2:real;

begin

readln(z1,z2);

writeln(z1+z2/2);

end.

3. Программа для нахождения суммы цифр двузначного числа.

var x,z1,z2:real;

begin

readln(x,z1,z2);

z1:=x div 10;

z2:=x mod 10;

writeln(z1+z2);

end.​

Answer 1

Ответ:

В первом неправильно.

readln(x);

х:=x*x;(x=2*2=4)

х:=x*x*x;(x=4*4*4=64, а должно быть 8. Можно написать x:=x*2;)

writeln(x);