Регистрация
тата246
18.04.2020 17:49
Информатика
Есть ответ 👍

Детально розроблений план створення призентації.

117
179
Посмотреть ответы 1

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

thankay
thankay
4,8(58 оценок)

var i,k: integer;

begin

k: =0;

for i: =111 to 999 do  

if((i mod 10)=(i mod 100 div 10)) and ((i mod 10)=(i div 100)) then k: =k+1;

write(k);

end.

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