Середины сторон квадрата последовательно соединены найти периметр полученной фигуры в поскаль

daryalit1967 daryalit1967    2   20.08.2019 07:00    1

Ответы
mirafill mirafill  05.10.2020 06:50
Var
   a: integer;
   p: real;
begin
   writeln('Введите сторону квадрата:');
   readln(a);
   p := sqrt(2*sqr(a/2))*4;
   writeln('Периметр: ', p);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика