Turbo Pascal

Написать программу вычисления объема цилиндра. Ниже представлен рекомендуемый вид экрана во время работы программы (данные, введенные пользователем, выделены полужирным шрифтом).

Вычисление объема цилиндра.

Введите исходные данные:

Радиус основания (см) = 5

Высота цилиндра (см) = 10

Объем цилиндра 1570.80 куб.см.

Для завершения работы программы нажмите .

Uses crt;
var r,h:real;
begin
write(Радиус основания (см) = );
read(r);
write(#Высота цилиндра (см) = );
read(h);
writeln(Объем цилиндра ,pi*r*r*h:0:2, куб.см.);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.