var y,x,a,c: integer;
begin
writeln ('Введите x, a, c');
read (x, a, c);
y:=(5*x) + (12*3*c);
writeln (y);
end.
var y,x,a,c: integer;
begin
writeln ('Введите x, a, c');
read (x, a, c);
y:=(5*x) + (12*3*c);
writeln (y);
end.