Сосавьте формулу PascalABC Площадь круга через диаметр

Паштет312 Паштет312    3   07.04.2020 03:58    0

Ответы
iceheart1618 iceheart1618  06.08.2020 08:10

Відповідь:

Program Programing_The_Best;

var d, r, PI, S: real;

begin

    PI := 3.1415926535;

    read(d);

    r := d / 2;

    S := PI * r * r;

    write(S);

end.

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