Ответ:

Код ниже

Объяснение:

program showFrom1To25;

var i: integer;

begin

   for i := 1 to 250 do begin

   writeln(i);

   end;

end.