с паскалем ответ получается 785 но никак там Написать программу вычисления объема цилиндра. Ниже приведен рекомендуемый вид экрана во время выполнения программы (данные, введенные пользователем, выделены полужирным шрифтом).

Вычисление объема цилиндра.

Введите исходные данные:

радиус основания (см) = 5 (ввод)

высота цилиндра (см) = 10 (ввод)

Объем цилиндра 1570.80 см. куб.

Для завершения нажмите <Enter>.

100

155

Посмотреть ответы 1

Ответы на вопрос:

ник4410

Информатика

4,6(63 оценок)

Var n,s,i: integer; begin write('n = '); readln(n); if n> 1 then s: =1+n else s: =1; for i: =2 to n div 2 do if n mod i = 0 then s: =s+i; writeln('s = ',s); end. пример: n = 12 s = 28

Популярно: Информатика

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку