Перепишите программу вычисления периметра и площади прямоугольника на языке Паскаль, исправив ошибки:
Program primer
Var a, b, s, p: integer;
Begin ;
Writeln(‘Введите стороны прямоугольника =’
ReadLn(a,b);
P=a+b;
S=a×b;
WriteLn(‘Площадь = ’s);
WriteLn(‘Периметр=’p);
End

Немножко000Фетешист Немножко000Фетешист    2   03.05.2020 12:41    1

Ответы
Romanus11 Romanus11  14.10.2020 06:13

Program primer; //добавили точку с запятой (отделяем операторов друг от друга)

Var a, b, s, p: integer;

Begin //убрали точку с запятой (после begin точка с запятой не ставится)

Write('Введите стороны прямоугольника = ');//добавили скобку и точку с запятой (после оператора write в скобках указывается что выводится на экран)

ReadLn(a,b);

P:=a+b;//добавили двоеточие (оператор присваивания  :=)

S:=a*b;//добавили двоеточие, заменили знак × на знак *  (звездочку - оператор умножения)

WriteLn('Площадь = ',s);//добавили запятую (при вводе и выводе переменные отделяются запятыми, вывод текста от переменных тоже)

WriteLn('Периметр = ',p);//добавили запятую

End.//добавили точку (окончания программы)

Объяснение:

Поправили ещё кавычки вместо знака ‘ поставила знак '

Заменили Writeln на Write в 4 строке, чтобы ввод осуществлялся в той же строке

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика