Складіть блок-схему алгоритму обчислення значення виразу (a+b)-c : (a-2b).Виконайте його при різних значеннях a, b,c. Доберіть значення так, щоб для різних наборів значень виконання алгоритму відбувалося по різному

Четыре приятеля-женя, костя, дима и вадим-делали украшения к праздннику. кто-то делал гирлянды из золотой бумаги, кто-то красные шары, кто-то гирлянды из серебряной бумаги, а кто -то хлопушки из золотой бумаги. костя и дима

работали с бумагой одного цвета, женя и костя делала одинаковые игрушки. кто какие украшения делал? нужен ответ до !

var a: array [1..100] of integer;

i,n: integer;

s: string;

begin

  randomize;

  for i : =1 to 100 do

  begin

      a[i]: = random(1000)+1000;

      a[i]: =a[i] mod 100;

      a[i]: =a[i] div 10;

      if a[i] mod 2 = 0 then n=n+1;

  end;

  writeln(n);

end.

const alphabet="яабвгдеёжзийклмнопрстуфхцчшщъыьэюя"; var filename: stringprocedure readfile(filename: string); var f: text; s: string; i,k: integer; begin      assign(f,filename);       reset(f);       while not eof (f) do begin { пока не конец файла }            readln (f, s);             for i: = 1 to length(s) do begin              k: =pos(s[i], alphabet);                   if k=1 then k=length(alphabet); {это приколы изза я}                   if k> 1 then s[i]: =alphabet[k-1];         end;             writeln(s);       end;       close(f); end; begin      read(filename);       readfile;       readln; end.