var
N, R, C, P, res:Integer;
Begin
Read(N, R, C, P);
res := N * C + R * P;
Writeln(res);
end.
Объяснение:
var
N, R, C, P, res:Integer;
Begin
Read(N, R, C, P);
res := N * C + R * P;
Writeln(res);
end.
Объяснение: