Помогите составить программу на языке паскаль абц:

Вычислите площадь круга и длину окружности по исходным данным.

Question

Информатика

Аннечка

8 февраля, 22:47

Помогите составить программу на языке паскаль абц:

Вычислите площадь круга и длину окружности по исходным данным.

+5

Ответы (1)

Знаете ответ на вопрос?

Донат · Answer 1

Const

Pi = 3.141592;

var

R, S, L : Real;

begin

Write ('Введите радиус круга: ') ;

ReadLn (R) ;

S : = Pi*sqr (R) ;

L : = 2*Pi*R;

Writeln ('S круга: ', S:0:3) ;

Writeln ('Длина окружности: ', L:0:3) ;

Readln;

end.

Помогите составить программу на языке паскаль абц:Вычислите площадь круга и длину окружности по исходным данным.

Помогите составить программу на языке паскаль абц:

Вычислите площадь круга и длину окружности по исходным данным.