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

Вопрос:

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

Ответ учителя:

Ответ:

program primer;

var a, b, s, p:integer;

begin

writeln ('Введите стороны прямоугольника');

readln (a, b);

p:=2*(a+b);

s:=a*b;

writeln ('Площадь=', s);

writeln ('Периметр=', p);

end.

Другие вопросы
Создать вопрос

Похожие вопросы: