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
