Вопрос, который вызвал трудности

Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре (программа Паскаль)

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Сумма каких-либо двух цифр заданного трехзначного натурального числа N равна третьей цифре (программа Паскаль)

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

var
    num:integer;
    a,b,c,s:byte;
begin
    for num:=100 to 999 do begin
        a := num div 100; b := num div 10 mod 10; c := num mod 10;
        s := a+b+c;
        if ((s = 2*a) or (s = 2*b) or (s = 2*c)) then
            writeln(num);
    end;
    readln;
end.