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

Question

Информатика

Евген

28 ноября, 05:17

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

+3

Ответы (1)

Знаешь ответ?

Доброгнева · Answer 1

Program E09;

uses crt;

var

R, S, DL: real;

begin

clrscr;

writeln ('Введите радиус: ');

readln (R);

S:=pi*sqr (R);

DL:=2*pi*R;

writeln ('Площадь: ', S:5:2);

writeln ('Длинна окружности: ', DL:5:2)

end.

В общем понял только так ...