Дана сторона квадрата .составьте программу для вычисления а)периметра б) длины диагонали в) площади квадрата
Дана сторона квадрата .составьте программу для вычисления а)периметра б) длины диагонали в) площади квадрата
Гость
Ответ(ы) на вопрос:
ГостьProgram N;
var a,p,s:integer;
c:real;
Begin
read(a);{вводим сторону квадрата}
c:=a*sqrt(2);
p:=4*a;
s:=sqr(a);
WriteLn( 'диагональ ',c:5:2, ' периметр ',p, ' площадь ',s );
end.
Не нашли ответ?
Похожие вопросы