Выведите на экран числа перво сотни, кратные 4. не паскаль! нужно fortran

Скорость теплохода по течению                   72: 3= 24   км/ч скорость плота=скорость течения  реки       72: 18= 4 км/ч собственная скорость теплохода                 24-4 = 20   км/ч скорость теплохода против течения             20-4 = 16 км/час ответ:   скорость теплохода при движении против течения 16 км/час

var

i: integer;

begin

for i: =100 to 999 do

if ((i+1) mod 2=0) and ((i+2) mod 3 =0) and ((i+3) mod 4=0) and ((i+4) mod 5 =0)

then writeln(i);

end.

 

var a: array [1..100] of integer;

i,n: integer;

s: string;

begin

  randomize;

  for i : =1 to 100 do

  begin

      a[i]: = random(1000)+1000;

      a[i]: =a[i] mod 100;

      a[i]: =a[i] div 10;

      if a[i] mod 2 = 0 then n=n+1;

  end;

 

  writeln(n);

end.