Найти площадь боковой поверхности цилиндра, известно радиус и
5-9 класс
|
высота. (примерное оформление на фото)
Program primer;
Uses crt;
var r,h,s: real;
Begin clrscr;
write('Введите радиус r = ');
readln(r);
write('Введите высоту h = ');
readln(h);
writeln;
if (r<=0) or (h<=0) then
write('Значения не могут быть отрицательными или равняться нулю')
else
begin
s:=h*(2*pi*r);
write('Площадь боковой поверхности цилиндра s = ', s:0:3);
end;
readln;
End.
Другие вопросы из категории
информационный объем сообщения в этой кодировке:
Длина этого текста 17 бит.
1) 17 бит 2) 136 бит 3) 17 байт 4) 25 байт
Читайте также
высоте и радиусу основания. Данные задать статически. (Sосн=pR2; Sбок.пов=2pRh)
Дана сторона равностороннего треугольника. Найти площадь этого треугольника, его высоты, радиусы вписанной и выписанной окружностей.
сторона равностороннего треугольника. Найти площадь этого треугольника, его
высоту, радиусы вписанной и описанной окружностей. В программе Microsoft Visual Studio C#