Program pr1;
var A, B, C: integer;
begin
writeln('Самолётов, ракет, спутников');
readln(A, B, C);
writeln('Игорак сбил:');
writeln(A,' Самолётов');
writeln(B,' Ракет');
writeln(C,' Спутников');
writeln('Он набрал ', A*50+B*100+C*200, ' очков');
end.