Предмет: Информатика,
автор: mandelshtamm228
ПОМОГИТЕ ПЛИЗ!!!)
Составьте программу для нахождения наименьшего натурального числа, куб которого начинается с цифр 2016
Выходные данные 1out : 3
27
Ответы
Автор ответа:
0
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен";
ПЕР
число, куб: ШИРЦЕЛ;
УКАЗ
число := 1;
КОЛЬЦО
УВЕЛИЧИТЬ(число);
куб := число * число * число;
ПОКА куб > 10000 ВЫП
куб := куб ДЕЛИТЬ 10
КОН;
ЕСЛИ куб = 2016 ТО
Вывод.ЧЦел("%d", число, 0, 0, 0);
ВЫХОД
КОН
КОН
КОН Задание.
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен";
ПЕР
число, куб: ШИРЦЕЛ;
УКАЗ
число := 1;
КОЛЬЦО
УВЕЛИЧИТЬ(число);
куб := число * число * число;
ПОКА куб > 10000 ВЫП
куб := куб ДЕЛИТЬ 10
КОН;
ЕСЛИ куб = 2016 ТО
Вывод.ЧЦел("%d", число, 0, 0, 0);
ВЫХОД
КОН
КОН
КОН Задание.
Автор ответа:
0
2722 20168071048
Автор ответа:
0
Первое - число, второе - куб.
Автор ответа:
0
Входных данных тут нету, только выходные.
Автор ответа:
0
Спасибо огромное :)))
Автор ответа:
0
Пожалуйста.
Интересные вопросы
Предмет: Математика,
автор: marishak663
Предмет: Русский язык,
автор: prostochel54
Предмет: История,
автор: pasacesnyj
Предмет: Химия,
автор: Аноним
Предмет: Биология,
автор: alinarokkel