По данному значению первого числа в последовательности и алгоритма запишите значения трех следующих элементов последовательности: Первое число в последовательности равно 471
Каждое следующее число в последовательности задаётся согласно следующему алгоритму:
1. Вычисляется сумма цифр числа.
2. Если сумма цифр числа >17
То средняя цифра числа заменяется на цифру 3
Иначе средняя цифра числа заменяется на цифру 8
Все
3. Получившееся число записывается в обратном порядке.
471, и три числа нужно
​

program pr; label l; var mas: array[1..10] of integer; i,k,n,b,sum: integer; beginrandomize; for i: =1 to 10 do mas[i]: =round(())*random+(-10)); l: for i: =1 to 10 dobeginif n< mas[i] thenbeginn: =mas[i]; k: =i; end; end; writeln ('a[',k,']=',n); mas[k]: =-11; n: =0; k: =0; if b=0 thenbeginb: =1; goto l; end; readln; end.

программу проверил все работает

имя       возраст     занятие

оля         13             пение

петя         14           баскетбол

вася         13             хоккей

катя         15             танцы

коля         11         баскетбол

серёжа     11           футбол

гласные звуки иероглифами не передавались.

каждый цвет может иметь 4 значения 2^2

если базовых цвета 3(rgb) то всего получится 4*4*4=64 цвета