Question

Найти и исправить все ошибки, допущенные в этой программе. Запишите программу без ошибок. Program summa;var a,b:intiger;begin;vritleln('ввести числа')s=a+breadln('Сумма равна')end

Answer 1

Ответ:

Program summa;

var a,b,s:integer;

begin;

write('Ввести числа ');

readln (a,b);

s:=a+b;

write('Сумма равна ',s)

end.

Answer 2

Вот исправленная версия вашей программы на языке Pascal:

pascalCopy code
Program summa;
var
  a, b: integer;
begin
  writeln('Введите числа:');
  readln(a);
  readln(b);
  writeln('Сумма равна ', a + b);
end.

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

1. Исправлено определение переменных a и b (заменено intiger на integer).
2. Убраны точки с запятой после begin и end.
3. Исправлены опечатки в строках vritleln и breadln. Использованы writeln и readln соответственно.
4. Добавлено чтение переменных a и b с помощью readln.
5. Изменен способ вывода суммы, чтобы корректно отобразить результат.

Теперь программа должна правильно считывать два числа и выводить их сумму.