program z1;

var a,b,s:integer;

begin

writeln ('vvedite a');readln (a);

writeln ('vvedite b'); readln (b);

s:=(a+b)/20;

writeln ('otvet',s');

end.

input a,b

c=(a+b)/20

? c