Вывести квадраты и кубы 10 чисел следующей последовательности: - вопрос №3930619101247 от Veta1986 01.05.2023 06:45

Question

Информатика: Вывести квадраты и кубы 10 чисел следующей последовательности: 1, 2, 4, 7, 11, 16, 22, 29, 37, 46

Veta1986 · Answer

Var x,d:integer;beginx:=1; d:=1;while x 46 dobeginwriteln(x*x, , x*x*x);x:=x+d;d:=d+1;end;end....