Составить алгоритм и программу нахождения периметра квадрата по введённому значению его площади

Question

Павлюня

20 мая, 00:51

+5

Ответы (2)

Знаете ответ на вопрос?

Ионична · Answer 1

Var

s: real;

a: integer;

begin

readln (a) ;

s : = 4*sqrt (a) ;

writeln (s) ;

end.

Адель · Answer 2

Program asd; var a, p:real; begin writeln ('Введите сторону квадрта') ; readln (a) ; p:=4*a; writeln ('p = ', p:10) ; readln (p) ; end.