Question

а) Расставьте строки программы в правильном порядке.

p := x * y * k;

write('Введите три целых числа через пробел');

end.

var х,у,k,z,p: integer;

z := x + y + k;

program zadanie1;

write ('Сумма = ',z);

readln (x,y,k);

write ('Произведение = ',p);

begin

Answer 1

Ответ:

program zadanie1;

var х, у, k, z, p: integer;

begin

write('Введите три целых числа через пробел');

readln (x,y,k);

z := x + y + k;

p := x * y * k;

write ('Сумма = ',z);

write ('Произведение = ',p);

end.