А) Расставьте строки программы в правильном порядке. p := x * y * k; write('Введите три...

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.