Укажи диаметр окружности если её радиус 4 см

Вычислить площадь полной поверхности и объем прямого кругового цилиндра, заданного высотой и диаметром основания.

моё решение
Код 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.

верно ли мое решение?

в швейной мастерской было 14 кусков материи по 30 м в каждом, и 6 кусков по 40 м в каждом. На пошив изделий израсходовали 280 м 45 см материи.Сколько материи осталось? надо таблицу!!!!!!! а не решение!!!!!

пожалуйста срочно  надо.

плиз)))))

геометрическая  прогрессия (an) задана условиями а1=-64,an+1=-1|2an.найдите а4