На диаграмме показано, сколько пирожков робин бобин барабек съедал во все рабочие дни недели. для наглядности среднее число съеденных пирожков отмечено горизонтальной линией. но случилось так, что кусок диаграммы робин тоже откусил и съел. известно лишь, что в четверг было съедено ровно 20% пирожков, съеденных за все пять дней. сколько пирожков робин съел в пятницу?

Диаграммы нет, поэтому отвечу в общем виде. у нас есть число пирожков, съеденных в понедельник, вторник и среду. у нас есть среднее значение x. за всю неделю робин съел 5x пирожков. в четверг он съел ровно 0,2*5x = x пирожков, то есть среднее число. сложите понедельник, вторник, среду и четверг, то есть х. вычтите это все из общего количества 5х. получится количество пирожков, съеденных в пятницу.

program xxx;

    var i, k, d, e, s : integer;

begin

  k: =0;

  for i: = 10 to 99 do

    begin

          d: = i div 10;

          e: = i mod 10;

          s: =d + e;

          if i mod s = 0 then k: =k+1

    end;

    write ('кол-во чисел которые делятся на сумму своих цифр=', k);

    readln

end.