Программа с исправленными СИНТАКСИЧЕСКИМИ ошибками:
program pr1;
var a, b, d: integer;
begin
readln(a);
readln(b);
d:=1;
while (d<>a) or (b mod 4=0) do begin
d:=d+1;
readln(b);
end;
writeln(d);
end.
В информатике с таким понятием это - ГРАФ
Если в секундах получается 1,8 секунда, а если в минутах то 0,03 минуты.