Создать программу на языке Паскаль для расчёта длины и площади окружности радиусом R

algriskova06 algriskova06    3   04.12.2020 10:23    3

Ответы
Колобокхоёк Колобокхоёк  03.01.2021 10:30

program krug;

Const Pi = 3.14159265;

var r:integer;

perimetr, ploshad: real;

begin

writeln('Введи радиус окружности ');

read(r);

perimetr:=2*Pi*r;

ploshad:=Pi*r*r;

writeln('Площадь = ',ploshad,'; Периметр = ', perimetr);

end.

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