Паскаль: Составить функцию нахождения объема цилиндра по его радиусу основания r и высоте. С помощью данной функции вычислить объемы для N цилиндров.

Паскаль: Составить функцию нахождения объема цилиндра по его радиусу основания r и высоте. С помощью данной функции вычислить объемы для N цилиндров.
Гость
Ответ(ы) на вопрос:
Гость
program qq; var v,r,h:real; begin write('Введите значение r'); readln(r); write('Введите значение h'); readln(h); v:=pi*sqr(r)*h; write('Объем цилиндра =',v:6:2); end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы