Вопрос по информатике:
Паскаль
Дано n – натуральное число. Вывести на экран все числа, кубы которых не превышает n.
- 21.11.2017 09:27
- Информатика
- remove_red_eye 6747
- thumb_up 37
Ответы и объяснения 1
Var n,i:integer;
begin
write('n = '); readln(n);
i:=1;
while i*i*i<=n do
begin
writeln(i,' ',i*i*i);
i:=i+1;
end;
end.
Пример:
n = 200
1 1
2 8
3 27
4 64
5 125
- 22.11.2017 01:46
- thumb_up 5
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.