Куда здесь запихать скрипт чтобы работало и окно и он

самый большой авал это будет танцоры. поменьше актёры,а самый маленький авал певцы. 2 элемента

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.

ну вроде "алгоритм" переходит в "терминал", хотя по буквам не получается - только последние 5 нормально встают и то, если в алфавите нет ё и й

по формуле включений-исключений

35 = 24 + 18 + 12 - 5 - 10 - 8 + х

х = 4

чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения