Задание

Определите, при каком наибольшем введённом значении переменной d программа выведет число 84.

var n, s, d: integer;
begin
readln\(d\);
n := 0;
s := 0;
while s <= 299 do begin
s := s + d;
n := n + 7;
end;
write\(n\)
еnd.