дано число n вывести на экран все числа,кубы которых не превышает n Pascal - №15205571

дано число n вывести на экран все числа,кубы которых не превышает n
Pascal
- Предмет:
  Информатика
- Автор:
  isabelleetso
- 6 лет назад

Ответы 1

vari,n:integer;beginreadln(n);for i:=1 to n doif i*i*i<=n thenwriteln(i);end.
- Автор:
  lucía99
- 6 лет назад
- 0
Добавить свой ответ

Еще вопросы

Решите уравнение
3х+7х+19=179
6у-2у-17=131
7к+6к-13=130
Помогите срочно
- Предмет:
  Алгебра
- Автор:
  gilda
- 6 лет назад
- Ответов:
  
  1
- Смотреть
Сказка Руслан и Людмила
1)Какая беда случилась у князя Владимировича
2)Назовите соперников руслана
3)какую историю услышал рууслан при встречи со старцем
4)Что искал руслан на поле боя ??
5)Дайте характеристику Фарлафу
6)Фарлаф подло вонзил меч в грудь руслана ,каким образцом руслан остался жив?????
7)что открыл ты для себя читая поэму,кому сочувствуешь? ,кого осуждаешшь?,Почему??
- Предмет:
  Литература
- Автор:
  jerome
- 6 лет назад
- Ответов:
  
  1
- Смотреть
три дня грузовая машина по 2 раза в день ездила от деревни до железнодорожной станции и обратно и проехала всего 180 км.Сколько км от деревни до станции.
- Предмет:
  Математика
- Автор:
  parislogan
- 6 лет назад
- Ответов:
  
  2
- Смотреть
Est-ce que le paysage est joli en hiver?
- Предмет:
  Французский язык
- Автор:
  carinajenkins
- 6 лет назад
- Ответов:
  
  2
- Смотреть

How much to ban the user?

1 hour 1 day 100 years