Ответ:
Program Zn;var a,b,S,P:integer;c:real;BeginWriteln(‘Введите стороны а и b’);Readln(a);Readln(b);P:=2*a+2*b;S:=a*b;c:=sqrt(a*a+b*b);writeln(‘P=’,P);Writeln(‘S=’,S);Writeln(‘c=’,c);end.
(Проверено и откомпилировано на Pascal.NET)
Помогите составить задание на языке Паскаль:
Даны стороны прямоугольника: a и b.
Найти: P-периметр, S-площадь, с-диагональ.
— Правильный ответ на вопрос найдете нижеОтвет:
Program Zn;var a,b,S,P:integer;c:real;BeginWriteln(‘Введите стороны а и b’);Readln(a);Readln(b);P:=2*a+2*b;S:=a*b;c:=sqrt(a*a+b*b);writeln(‘P=’,P);Writeln(‘S=’,S);Writeln(‘c=’,c);end.
(Проверено и откомпилировано на Pascal.NET)