вывести на экран квадраты чисел от 1 до 10

РЕШЕНИЕ НА ФОТОГРАФИИ 2 Варианта

это литература? :D Если информатика то:beginx, time : integer;time:= 1;x:= 1;repeatwriteln(x*x);time:= time+1;x:= time;until time = 10;end.PascalABC