Question

Пожалуйста, помогите! Напишите программный код с помощью Pascal. Задан радиус окружности. Найдите площадь и длину
C=2Пr (П=3.14) - длина окружности
S=Пr^2 - площадь

Answer 1

var r:real;

begin

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

read(r);

writeln ('Площадь круга равна: ', 3.14*sqr(r):0:3);

writeln ('Длина окружности равна: ', 2*3.14*r:0:3);

end.

Answer 2

у меня тоже PascalABC.NET

Answer 3

о! Все получилось!!! Спасибо ОГРОМНОЕ!!!!

Answer 4

Что изменила?

Answer 5

У меня просто сначала название программы стояло, а потом я его убрала и все))) Я просто бываю тупой :)

Answer 6

Название программы можно было просто дописать: program Krug;