Напишите пожалуйста, программу для нахождения периметра, площади и диагонали квадрата со стороной а. На паскале, срочно очень нужно!

Напишите пожалуйста, программу для нахождения периметра, площади и диагонали квадрата со стороной а. На паскале, срочно очень нужно!
Гость
Ответ(ы) на вопрос:
Гость
Uses Crt; Var s,s1,s2,a:longint; begin  clrscr;  readln(a) ; s:=a*4; s1:=a*a; s2:=abs(2)*a;  writeln(s,' ',s1,' ',s2); End.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы