Войти Регистрация Спроси ai-bota

Дано число n вывести на экран все числа,кубы которых не превышает n pascal

Показать ответ

Ответ:

kashalotic20

03.10.2020 00:15

Var
i,n:integer;
begin
readln(n);
for i:=1 to n do
if i*i*i<=n then
writeln(i);
end.

0,0(0 оценок)

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

ulianalypka

21.05.2021 09:50

Написать 2 программы на языке pascal. 1 программа. задано число x. определить, является ли число x положительным или нет. выдать на экран соответствующее сообщение....

vlasyukksterin

07.03.2020 12:32

Напишите программу на ! сколько понадобится парт,чтобы рассадить а школьников, если за одну парту можно посадить одного или двух человек? за каждой партой должен...

эля792

07.03.2020 12:32

Постройте граф, отражающий разновидности информационных моделей. их всего 3....

Федёк5

29.01.2022 19:56

1. разработать схему алгоритма, который вводит массив из nцелых чисел и выводит на экран этот же массив в прямом и обратном порядке. протестировать алгоритм на произвольных...

2837637352728

29.01.2022 19:56

Постройте табличную модель по позиционным системам счисления. указав название системы счисления, основание и алфавит....

fj8f

29.01.2022 19:56

1)может ли передаваться информация от человека к человеку и от поколения к поколению без использования моделей? ответ обоснуйте. 2)продолжите предложение «построение...

Азрет2002

29.01.2022 19:56

Какая модель является сетевой? 3 примера....

AnyMaskelyne

23.04.2020 11:14

Какое количество информации содержится в сообщение я учусь в 10 классе ....

liliakolokol

24.09.2022 20:58

Можете объяснить как это делать? нам сказали столбиком что-то делить, но что именно и на что я не понимаю. ...

Evloevckuú

11.07.2021 01:07

Дать определения каждому как можно быстрее...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку