Есть ответ 👍

, + за правильные ответы

149
256
Посмотреть ответы 1

Ответы на вопрос:

hoseokjkjk
4,6(31 оценок)

Var   i,s1,s2: integer; begin   i: =100;   repeat       s1: =(i div 100)+((i mod 100) div 10)+(i mod 10);       s2: =i div 20;       s2: =(s2 div 10)+(s2 mod 10);       if s1=s2 then writeln(i);       i: =i+20;   until i> 999 end. результат выполнения программы: 180 360 540 720 900

Популярно: Информатика