Составьте программу вычисляющую площадь круга и вычисляющую 30% от площади круга, используя подпрограмму процедура. язык - паскаль. пи =3.14

Glitchyyy Glitchyyy    3   29.09.2019 18:20    0

Ответы
sashahyrik sashahyrik  17.08.2020 01:25

begin

 var r := ReadReal();

 var S: Action2<real, real> :=  

   (percent, radius)-> Println(percent * Round(Pi, 2) * radius ** 2);

 S(1, r);

 S(0.3, r);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика