Program Lab7b; Var a,b,c:integer; Begin write ( - вопрос №720637084 от Котосоловей 05.05.2020 10:10

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

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

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);

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);