• Предмет: Информатика
  • Автор: ibragimovasaniyat20
  • Вопрос задан 6 лет назад

найти площадь цилиндра через константу П ​

Ответы

Ответ дал: maximmayorov2011
0

Блок-схема слишком просто, описание величин, вводим данные в параллелограмм, выражение в прямоугольник и вывод значения в параллелограмм. Естественно не забываем про начало и конец, стрелочки. Обычный линейный алгоритм.

Вот программа:

Без первой строки замечательно работает, я ленивый.

const pi=3.14;

var s, r, h: real;

begin

writeln ('Введите длину радиуса');

readln(r);

writeln ('Введите длину высоты');

readln(h);

s:=2*pi*r*h+2*pi*r*r;

writeln ('Площадь поверхности цилиндра равна ', s);

end.

Вас заинтересует