Вычислить площадь полной поверхности и объем прямого кругового цилиндра, заданного высотой и диаметром основания. моё решение код pascal 1 2 3 4 5 6 7 8 9 10 11 12 13 14 program qwe; uses crt; var h,r: integer; s,v: real; begin clrscr; 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. верно ли мое решение?