Составить программу вычисления S квадрата если задан P

Задание:

Составить программу вычисления S квадрата если задан P

Решение:

Uses crt; var p: integer; a,s: real; begin; readln (p); a: =p/4; s: =a*a; writeln (s); end.

Знаете другой ответ?

Отправить свой ответ