Вычислить площадь полной поверхности и объем прямого кругового цилиндра, заданного высотой и диаметром основания. моё решение Код Pascal1234567891011121314 program qwe;uses crt;var h,r:integer;S,V:real;beginclrscr;h:=10;r:=5;S:=2*pi*r*h ;writeln('ploshad = ',s:2:0);V:=pi*sqr(r)*h;writeln('ob`iem = ',v:2:0);end. верно ли мое решение?

Предыдущий
вопрос Следующий
вопрос

Извините, но ваше решение содержит ошибки.
Ваша формула для вычисления площади полной поверхности цилиндра неверна. Правильная формула: S = 2πrh + πr^2, где r - радиус основания цилиндра, h - его высота.
И для объема правильная формула: V = πr^2h, где r - радиус основания цилиндра, h - его высота.

Вот исправленный код на Pascal:

program qwe;
uses crt;
var h, r: integer;
S, V: real;
begin
clrscr;
h := 10;
r := 5;
S := 2 * pi * r * h + pi * sqr(r);
writeln('Площадь = ', S:2:0);
V := pi * sqr(r) * h;
writeln('Объем = ', V:2:0);
end.

Теперь результат будет правильным.