أرشيف قسم الرياضيات والإعلام الآلي

quels sont les résultats affichés à l'écran suite à l'exécution du programme suivant :
program p ;

var
i: integer;
begin
for i := 1 to 4 do
if (i mod 4 =0 ) or ( i mod 5=0) then write(i);
end.
rappel : a mod b donne le reste de la division entiére de a par b
exemples:
      15 mod 3=0
      19 mod 4 =3