Экономика
Гость
11.07.2019
Создать программу вычисления объёма цилиндра
Ответы:
program tt;

const

  Pi=3.14;

var

  r,h:integer;

  s,v:real;

begin

  write('Введите r= ');

  readln(r);

  write('Введите h=');

  readln(h);

  S:=2*Pi*r*(h+r);

  writeln('Площадь равна ',S);

  readln;

end.



Все работает проверил.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос Создать программу вычисления объёма цилиндра по предмету Экономика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.