Помогите пожалуйста .Срочно. Программа Turbo Pascal.11 класс. 1.Вычислить площадь круга. 2.Объём цилиндра.
Помогите пожалуйста .Срочно. Программа Turbo Pascal.11 класс.
1.Вычислить площадь круга.
2.Объём цилиндра.
Гость
Ответ(ы) на вопрос:
Гость1) var s,r:integer;
begin
read(r);
s:=3.14*r;
write(s);
end.
2) var s,r,h,v:integer;
begin
read(r);
s:=3.14*r;
read(h);
v:=s*h;
write(v);
end.
Не нашли ответ?
Похожие вопросы