Question

Помогите, пожалуйста! Говорит "Встречено еlse, a ожидался оператор" Progtam prim_5; Var x: integer; Begin; Readln(60); if 60>=0 then; x:= 60-50; else x:= 60+100; writeln (60); end.

Answer 1

Ответ:

Program prim_5;

Var x: integer;

Begin;

Readln(x);

if x>=0  

then

x:= x-50

else

x:= x+100;

writeln (x);

end.

Answer 2

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

pascalCopy code
Program prim_5;
Var
  x: integer;
Begin
  Readln(x);
  if x >= 0 then
    x := x - 50
  else
    x := x + 100;
  writeln(x);
End.

В этой исправленной версии:

1. Я удалил Readln(60);, поскольку предполагаю, что вы хотите считать значение пользовательского ввода в переменную x. Readln(60); было некорректным и вызывало ошибку.

2. Я заменил if 60 >= 0 then; на if x >= 0 then. Предполагается, что вы хотите проверить, является ли введенное пользователем число положительным или нулем. Если это так, то выполняется выражение x := x - 50, иначе выполняется выражение x := x + 100.

3. Я переместил writeln(60); после вычисления значения переменной x. Вероятно, вы хотите вывести значение x, а не число 60.

Пожалуйста, обратите внимание, что исправленный код написан на языке Pascal. Если вы используете другой язык программирования, то вам может потребоваться внести некоторые изменения в соответствии с синтаксисом выбранного языка.