Question

Что делать, не могу понять что не так, пишет встречено writeln, а ожидалось ';' PI = 3.14; H = 'Hello'; var a, b: integer; name: string; begin writeln ('Введите своё имя: '); readln (name); writeln (H, ', ',name, '!'); writeln ('Введите значение a: '); readln (a); writeln ('Введите значение b: '); readln (b) writeln('Сумма a + b = ',a+b) end.

Answer 1

После readln(b) и writeln(‘Сумма a + b = ‘,a+b) поставьте ;

Answer 2

Похоже, у вас в коде пропущена точка с запятой после оператора readln(b). Это приводит к ошибке компиляции, так как компилятор ожидал точку с запятой перед ключевым словом writeln('Сумма a + b = ', a+b).

Вот исправленный код:

pascalCopy code
PI = 3.14;
H = 'Hello';
var a, b: integer;
name: string;

begin
  writeln('Введите своё имя: ');
  readln(name);
  writeln(H, ', ', name, '!');
  writeln('Введите значение a: ');
  readln(a);
  writeln('Введите значение b: ');
  readln(b);
  writeln('Сумма a + b = ', a + b);
end.

Теперь код должен успешно скомпилироваться и работать правильно.