Напишите циклический алгоритм с во я живу на этом этаже?"

старше будет девочка потому что там написано втрое

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.

program zadacha6; var a,b: real; begin readln(a,b); if a> b then writeln (a) else writeln (b); end.

не? я не уверен

у меня получилось, что первое число 954, второе 459, а третье 495. т.е. получился пример : 954-459=495