Var x, a, b: integer;
Begin
x:=0;
Readln(a, b);
If ((a<56 and b<56)) then
x:=a*(5+b)+65
else writeln ('ошибка');
Writeln(x)
End.
Var x, a, b: integer;
Begin
x:=0;
Readln(a, b);
If ((a<56 and b<56)) then
x:=a*(5+b)+65
else writeln ('ошибка');
Writeln(x)
End.