Вывести квадраты и кубы 10 чисел следующей последовательности: - вопрос №1013931187 от artyomka12 15.09.2021 23:10

Question

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

artyomka12 · 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....