Question

Задана сумма в копейках.Напечатать эту сумму в рублях и копейках на Паскале

Answer 1

Чесно ты не написал сколька копеек

Answer 2

Для решения данной задачи на языке Паскаль, можно воспользоваться следующим алгоритмом:

1. Объявить переменную summa типа integer и присвоить ей заданное значение суммы в копейках. 2. Объявить две переменные rubli и kopeiki типа integer. 3. Разделить значение summa на 100, чтобы получить количество рублей. Результат сохранить в переменную rubli. 4. Вычислить остаток от деления значения summa на 100, чтобы получить количество копеек. Результат сохранить в переменную kopeiki. 5. Вывести на экран значение rubli и kopeiki в нужном формате.

Пример кода на языке Паскаль:

program ConvertKopeikiToRubli;
var
  summa, rubli, kopeiki: integer;
begin
  // Ввод суммы в копейках
  writeln('Введите сумму в копейках:');
  readln(summa);
  
  // Преобразование копеек в рубли и копейки
  rubli := summa div 100;
  kopeiki := summa mod 100;
  
  // Вывод результата
  writeln('Сумма в рублях и копейках:');
  writeln(rubli, ' руб. ', kopeiki, ' коп.');
end.

После выполнения программы, она запросит ввести сумму в копейках, например, 56789. Затем программа выведет на экран результат: "567 руб. 89 коп.".