программа на Паскаль. Условие задачи: вычислить площадь окружности. Радиус вводится с клавиатуры
10-11 класс
|
var
r,pi:real;
begin
writeln('Введите радиус окружности');
readln(r);
pi:=4*ArcTan(1);
writeln('Площадь окружности равна ', pi*sqr(r))
end.
Тестовые решения:
Введите радиус окружности
1
Площадь окружности равна 3.14159265358979
Введите радиус окружности
3.54
Площадь окружности равна 39.3691824977259
Другие вопросы из категории
Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом). В каком году началась вторая мировая война? Введите число и нажмите <Enter>
информации мы получим, когда поймаем какую-нибудь рыбу?
Читайте также
Составить программу на паскале.
Условие: Найти и вывести максимальный элемент кратный N.
N вводится с клавиатуры.
Нечетное то вычислить сумму : 1 + 2 + .+N.Составить программу на паскале