помогите.пожалуйста
Написать программу на языке Паскаль для решения задачи: По данным сторонам прямоугольника вычислить его периметр, площадь и длину диагонали. Входные данные задать самостоятельно. Для проверки подготовить код программы и результаты ее работы.
Написать программу на языке Паскаль для решения задачи: По данным сторонам прямоугольника вычислить его периметр, площадь и длину диагонали. Входные данные задать самостоятельно. Для проверки подготовить код программы и результаты ее работы.
More Questions From This User See All
Answers & Comments
a,b,S,P:Integer;
d:real;
Begin
Writeln('Введите стороны прямоугольника');
Read(a,b);
P:=2*(a+b);
S:=a*b;
d:=sqrt(sqr(a)+sqr(b));
Writeln('Периметр=', P);
WriteLn('Площадь=', S);
WriteLn('Диагональ=', d:6:2);
End.