A1:=5/(19x)a2:=a1/xa3:=a2/xa4:=a3/x y:=a1+a4

var

  n,i,z: integer;

begin

  readln(n);

for i: =1 to n do if n mod i=0 then inc(z,i);

writeln(z);

end.

const

  a: array[1..6]of longint=(7,4,10,6,5,3);

var

  i: longint;

begin

for i: =1 to 6 do  write(9.8*a[i]*1200,' ');

writeln;

end.

егора-зеленая на 16гб

василий-желтую на 8гб

пети-краснаяна 4гб