Варианты ответа:
6,3,7,5

program;   var  i: byte;   str: string;   begin  for i: =60 to 70 do  begin  str: =str+chr(i) ;   end;   writeln(str);   end.

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

4k+2m+1=41

k+m+1=15

4k+2m=40

k+m=14

2k+m=20

-k-m=-14

k=6

32*64

*56*1/1024=112 кбайт