Некоторая вещь стоит A рублей и B копеек. Было куплено N таких вещей. Запишите общую стоимость покупки в рублях и копейках в переменные C1 и С2. Значения переменных A и N не превосходят 30000, а значение переменной B не превосходит 100. Переменные С1 и С2 имеют тип longint. Другие переменные не использовать.
Ответы на вопрос
Ответил HRAshton
0
var C2, C1: longint;
a, b, n: integer;
begin
readln(a, b, n);
b := b + a * 100;
C1 := b * n;
C2 := C1 mod 100;
C1 := C1 div 100;
writeln(C1, ',', C2);
end.
Вот так =)
a, b, n: integer;
begin
readln(a, b, n);
b := b + a * 100;
C1 := b * n;
C2 := C1 mod 100;
C1 := C1 div 100;
writeln(C1, ',', C2);
end.
Вот так =)
Новые вопросы