Предмет: Информатика, автор: dememchukova

программа вычисляющая объём и площадь полной поверхности цилиндра

Ответы

Автор ответа: ubunt
0
var r,h,s,v: real;
  begin  write('Введите радиус: ');
  readln(r);
  write('Введите высоту: ');
  readln(h);
  s:=4*pi*r*(h+r);
  v:=pi*r*r*h;
  writeln('Полная площадь цилиндра равна ',s);
  writeln('Объем цилиндра равен ',v);
end.
Автор ответа: Аноним
0
" s:=4*pi*r*(h+r);"
Ты откуда четвёрку взял?
Автор ответа: ubunt
0
s:=2*pi*r*(h+r);
Похожие вопросы
Предмет: Математика, автор: Адиба2000