Question

Program Lab7b; Var a,b,c:integer; Begin write ('введите a='); read(a); write ('введите b='); read(b); write ('введите c='); read(c); writeln; writeln ('вывод:'); write('a=',a); writeln('b=',b); write('c=',c); End. Выдаёт ошибку на read(b);

Answer 1

Нужно вводить целые числа, если у b тип integer.

Answer 2

Ошибка на строке read(b) возникает из-за того, что функция read принимает в качестве аргумента переменную типа var, а не просто значение. Для исправления этой ошибки нужно передать переменную b в функцию read, используя оператор var. Вот исправленный код:

program lab7b; var a, b, c: integer;

begin write('Введите a = '); readln(a); write('Введите b = '); readln(b); write('Введите c = '); readln(c);

writeln; writeln('Вывод:'); writeln('a = ', a); writeln('b = ', b); writeln('c = ', c); end.

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