Где их находить то ?Или просто вывести натуральные числа от 1 до 5 циклически?
vari:integer;beginfor i:=1 to 5 dowrite(i, ' ');end.