4.2.4 Вывести квадраты и кубы 10 чисел следующей последовательности: 2, 2, 4, 6, 10, 16, 26 ...
Пример:
2 * 2 = 4
2 * 2 * 2 = 8
2 * 2 = 4
2 * 2 * 2 = 8
4 * 4 = 16
4 * 4 * 4 = 64
...
4.2.5 Составить программу для вычисления НОД трех чисел с помощью модифицированного алгоритма Евклида
Пример:
Введите три целых числа:
30 72 126
НОД(30, 72, 126) равно 6.
Желательно написать решение этих задач на языке "КуМир"

Предыдущий
вопрос Следующий
вопрос

4.2.4 Пример программы на языке "КуМир":

нач
ЦелаяПроцедура ВывестиКвадратыИКубы(числа: список[10])
для каждого число из числа цикл
Вывести("Квадрат числа ", число, " = ", число число)
Вывести("Куб числа ", число, " = ", число число * число)
кон
КонецПроцедуры

числа = [2, 2, 4, 6, 10, 16, 26, ...] // продолжите последовательность
ВывестиКвадратыИКубы(числа)

конец

4.2.5 Пример программы на языке "КуМир":

нач
ЦелаяПроцедура НайтиНОД(а, б, в)
пока а ≠ б ИЛИ б ≠ в цикл
если а > б
то a = a - b
иначе
то b = b - a
кон
если б > в
то b = b - v
иначе
то в = в - b
кон
кон
если а < b И a < "в"
то Вывести("НОД(", а, ", ", b, ", ", в, ") равен ", a)
иначе если b < "а" И b < "в"
то Вывести("НОД(", а, ", ", b, ", ", в, ") равен ", b)
иначе
то Вывести("НОД(", а, ", ", b, ", ", в, ") равен ", в)
кон
КонецПроцедуры

Вывести("Введите три целых числа:")
Ввод(п, q, r)
НайтиНОД(п, q, r)

конец