334. Остаток
от qweqw qweqw - Суббота 15 Март 2014, 19:49
334. Остаток
  program igor;
var a,b,c,d,i:int64;
begin read(a,b,c,d);
for i:= a to b do
if (c mod d0) then write(i,' ');
end.

пишет ошибка компиляции, но у меня на компе она работает без ошибки
Re: 334. Остаток
от Никита Пушкин - Воскресенье 16 Март 2014, 19:20
  Попробуйте вместо int64 использовать int32.
Re: 334. Остаток
от Антон Карабанов - Понедельник 17 Март 2014, 02:52
  Да, во FreePascal-е счетчик цикла не может быть int64.