Question

Program pr_1; var x,y,sum, umn: integr; begin write ('x='); readln (x); write ('y='); readln (y); sum:=x+y umn:=x*y; writeln ('sum=',sum); writeln ('umn=',umn); readln; end найдите ошибки

Answer 1

Ответ:

Попробуй написать не integr, a integer

Answer 2

Program pr_1;

var

x,y,sum, umn: integer;

begin

write ('x=');

readln (x);

write ('y=');

readln (y);

sum:=x+y; //Точка с запятой

umn:=x*y;

writeln ('sum=',sum);

writeln ('umn=',umn);

readln;

end. //Обычная точка

Answer 3

Программа содержит несколько ошибок. Вот исправленная версия:

pascalCopy code
Program pr_1;
var
  x, y, sum, umn: integer; // Заменил "integr" на "integer"
begin
  write('x=');
  readln(x);
  write('y=');
  readln(y);
  
  sum := x + y; // Добавил ";"
  umn := x * y;
  
  writeln('sum=', sum);
  writeln('umn=', umn);
  readln;
end.

Исправления:

1. Заменил "integr" на "integer" для объявления переменных.
2. Добавил отсутствующий символ ";" после вычисления суммы (sum := x + y;).
3. Добавил точку (.) в конце команды end. чтобы правильно завершить программу.