Составить пример работы алгоритма в виде бок-схемы? касса. в одномерном массиве в порядке убывания представлены достоинства денежных знаков (купюр и монет) валютной системы некоторой страны. реализовать выдачу в этой системе заданной суммы – m, минимальным числом денежных знаков.

Var       n, s, i: integer;       x: array[1..100]of integer; begin       writeln('введите кол-во купюр, их значения и необходимую сумму');       readln(n);       for i : = 1 to n do               read(x[i]);       readln(s);             for i : = n downto 1 do       begin               if s div x[i] > 0 then                       write(s div x[i], '*', x[i], ' ');               s : = s mod x[i];       end;             if s < > 0 then               writeln('no') end.

по одному.

обь в канал, мир,енесей,россия проплыли канал. обь выплыла и поплыла себе куда надо.

мир,енесей,россия вернулись обратно перед каналом

в канал заплыл восток.

мир,енесей,россия проплыли канал. восток уплыл

и тд

 

картинка должна быть в папке с программой и быть в формате bmp

uses graphabc;

var n: string; b: picture; s: integer;

begin writeln('введите расстояние до зеркала'); readln(s); write('введите имя файла рисунка: '); readln(n); window.clear; b : = picture.create(n); b.load(n); b.draw(50, 50); b.fliphorizontal; b.draw(50+2*s,50); end.