Предмет: Информатика,
автор: superpsihiii
Некоторая вещь стоит A рублей и B копеек. Было куплено N таких вещей. Запишите общую стоимость покупки в рублях и копейках в переменные C1 и С2. Значения переменных A и N не превосходят 30000, а значение переменной B не превосходит 100. Переменные С1 и С2 имеют тип longint. Другие переменные не использовать.
Ответы
Автор ответа:
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.
Вот так =)
Похожие вопросы
Предмет: Геометрия,
автор: rahimberganovabonu
Предмет: Українська мова,
автор: motokmaksim49
Предмет: Математика,
автор: milanasafikova99
Предмет: Геометрия,
автор: Anya1212