Дана площадь квадрата. Составьте программу для его сторон и периметра.

Question

Информатика

Феня

6 января, 18:37

Дана площадь квадрата. Составьте программу для его сторон и периметра.

+3

Ответы (1)

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

Фантика · Answer 1

Program patrart;

var a, p, l:real;

begin

write ('плошадь=') ;

readln (a) ;

l:=sqrt (a) ;

p:=l*4;

writeln ('сторона=', l) ;

writeln ('периметр=', p) ;

end.