вывести на экран квадраты нечетных чисел от 1 до 9
при помощи for, иначе не пойдет
кто прваильно сделает-очень много баллов
очень прошу, помогите
паскаль

program kvadr_nechot;var i:integer;beginfor i:=1 to 9 do  if i mod 2 = 1 then write(i*i, '   ')end.

var  i:integer;begin  for i:=1 to 5 do Write(sqr(2*i-1),' ')  end.Результат1 9 25 49 81