profile
Опубликовано 4 года назад по предмету Информатика от superpsihiii

Некоторая вещь стоит A рублей и B копеек. Было куплено N таких вещей. Запишите общую стоимость покупки в рублях и копейках в переменные C1 и С2. Значения переменных A и N не превосходят 30000, а значение переменной B не превосходит 100. Переменные С1 и С2 имеют тип longint. Другие переменные не использовать.

  1. Ответ
    Ответ дан HRAshton
    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.

    Вот так =)
Самые новые вопросы