решить информатику с подробным объяснением При каком наибольшем введенном числе d после выполнения программы будет напечатано 89?
var n, s, d: integer;
begin
readln(d);
n := 5;
s := 83;
while s <= 1200 do begin
s := s + d;
n := n + 6
end;
write(n)
end.