Алгоритм слова кок (через вектора)

наибольшая поразрядная сумма может быть, если записаны три девятки, т.е. 27

2727 - удовлетворяет этому требованию. число 999999

277 - можно разбить только на 27'7. значит число имеет вид 999**. но сумма цифр 9** не может быть равна 7. не подходит.

2715 - разбиваем 27'15.
подходит. например, 99933

2730 - 27'30 не подходит

3027 - 30'27 не подходит

1527 - 15'27 подходит. например, 66999

727   - разбивается только на 7'27. значит, последние - три девятки. число **999. сумма цифр **9 не может быть равна 7. не подходит

512   -
 

program n_1;

var a,b: integer;

begin

    read(a);

    b: =0;

    while (a< > 0) do begin

        if(a> =100) and (a< 1000) and (a mod 4=0) then

       
    b: =b+a;

        read(a);

    end;

    writeln(b);

end.

исправил. твои ошибки (уже исправленные) выделены черным.

1. трехзначные числа не больше ста, а не меньше ста.

2. операция div -
частное от деления, а mod - остаток от деления. для проверки кратности используется mod.