Запиши верный ответ.
(Впиши соответствующую латинскую букву или цифру)

K&K=

var

  n,i,z: integer;

begin

  readln(n);

for i: =1 to n do if n mod i=0 then inc(z,i);

writeln(z);

end.

число-общее

столица росси - единичное

учебник - общее

житель москвы - общее

столица - общее

самая высокая гора - единичное

пушкин - единичное

сказочный персонаж - общее

баба яга- единичное

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются

плата вроде как, если не ошибаюсь