Почему снизу где окно ввода не выводится само 4+5+7=16

uses crt; var n: integer; beginread(n)n: =abs(n)-2; write(n); end.

рыжие и зеленоглазые - 2

рыжие или зеленоглазые - 6

рыжие и не зеленоглазые - 3

не рыжие и не зеленоглазые - 1

var

  i,s: longint;

begin

  for i: =20 to 60 do if i mod 5=0 then inc(s,i);

writeln(s);

end.

это просто название месяцев, а вот май, август, октябрь, декабрь в этих месяцах по 31 дню, если в учитесь по босовой , то ответить нужно именно так