Вычислить длину окружности и площадь круга
Вычислить длину окружности и площадь круга одного и того же заданного радиуса R.
Для решения данной задачи необходимо вспомнить формулы для длины окружности и площади круга:
P = 2πR
S = πR2
Далее пишем простейшую программу:
program z_1;
var P, R, S: real;
begin
write('Введите радиус круга: ');
read(R);
writeln('Длина окружности: ', 2*pi*R);
writeln('Длина окружности: ', pi*R*R);
end.
Текст задачи:
Информатика. 10 класс. Базовый уровень. (Семакин И. Г., Хеннер Е. К., Шеина Т. Ю.)
Работа 3.1, Уровень 1, Задача №1
Работа 3.1, Уровень 1, Задача №1
Автор: Александр Чернышов
2 комментария
Составить в тетради программу для нахождения площади круга и длину окружности.
//Составить в тетради программу для нахождения площади круга и длину окружности.
program zadacha;
const pi = 3.14;
var r, L, S:real;
begin
writeln (‘Введите радиус круга:’);
readln(r);
L:=2*pi*r;
S:=pi*r*r;
writeln(‘Длина окружности:’, L);
writeln(‘Площадь круга:’, S);
end.