Регистрация
nastyakot2609
17.04.2020 05:22
Информатика
Есть ответ 👍

Написать программу на паскале. запишите на языке паскаль программу, реализующую алгоритм работы кассира, сдачу (s) наименьшим возможным количество м банкнот по 500 (k500), 100 (k100), 50 (k50) и 10 (k10) рублей. пример входных данных 845 пример выходных данных следует сдать: банкнот по 500 руб — 1 шт. банкнот по 100 руб — 3 шт. банкнот по 50 руб — 0 шт. банкнот по 10 руб — 3 шт.

104
362
Посмотреть ответы 1

Ответы на вопрос:

09nika90
09nika90
4,6(100 оценок)
Var a: array[1..20] of integer; n,i: integer; begin read(n); for i: =1 to 20 do begin a[i]: =random(+201)-100; if (a[i] mod n = 0) and (i mod n = 0) then begin write('a[i]=',a[i],' i=',i); writeln(); end; end; end.

Популярно: Информатика