Question

Program p1; var y,x:integer; begin writeln ('введите 2 числа'); readln (x,y); writeln ('x+y=z''x-y=a'); s:=x+y; n:=x-y; writeln ('Сумма=',s); writeln ('Разность=',n); end. там где s:=x+y неизвестное имя s

Answer 1

Ответ:

var y, x, s, n:integer;

begin

 writeln ('введите 2 числа');

 readln (x,y);

 writeln ('x+y=z''x-y=a');

 s:=x+y;

 n:=x-y;

 writeln ('Сумма=',s);

 writeln ('Разность=',n);

end.

Answer 2

Привет! Ваш код на языке Pascal выглядит следующим образом:

Program p1;
var y, x, s, n: integer;
begin
  writeln('Введите 2 числа');
  readln(x, y);
  writeln('x + y = z, x - y = a');
  s := x + y;
  n := x - y;
  writeln('Сумма = ', s);
  writeln('Разность = ', n);
end.

В этом коде вы объявляете переменные `x` и `y` типа `integer`, а также переменные `s` и `n` для хранения суммы и разности чисел соответственно. Затем вы просите пользователя ввести два числа и считываете их с помощью `readln`. После этого вы вычисляете сумму `s` и разность `n` чисел `x` и `y`. Наконец, вы выводите значения суммы и разности на экран с помощью `writeln`.

Обратите внимание, что в вашем коде отсутствует объявление переменной `s`. Чтобы код работал корректно, вам нужно добавить объявление переменной `s` перед использованием. Например, вы можете добавить строку `var s: integer;` перед строкой `begin`.

Надеюсь, это поможет! Если у вас есть еще вопросы, не стесняйтесь задавать.