Запишите через запятую наименьшее и наибольшее значение числа d, которое нужно ввести, чтобы после выполнения программы было напечатано 53?

var n, s, d: integer;

begin

readln(d);

n : = 23;

s : = 18;

while s < = 1977 do begin

s : = s + d;

n : = n + 6

end;

write(n)

end.

asyanikolaeva0p08iun    2   06.10.2019 17:00    326