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.

Answer 2

Для правильной расстановки строк программы, нужно следовать логической последовательности действий. Вот правильный порядок строк:

pascalCopy code
program zadanie1;
var
  x, y, k, z, p: integer;

begin
  write('Введите три целых числа через пробел');
  readln(x, y, k);
  z := x + y + k;
  write('Сумма = ', z);
  p := x * y * k;
  write('Произведение = ', p);
end.

Обратите внимание, что я также добавил ; в конце строки write('Произведение = ', p) и end. в конце программы, чтобы правильно завершить программу на языке Pascal.