Есть ответ 👍

Придумай і запиши умову задачі для розв'язання якої можна використати дану алгоритмічну констукцію

155
395
Посмотреть ответы 1

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


Var       i, k: integer; begin i: = 100; k: = 0;   while i < 1000 do begin if (i * 2 mod 10 = 8) and (i * 3 mod 10 = 4) then write(i, ' ') else k: = k + 1; i: = i + 1; end; if k = 900 then writeln('таких чисел не существует! '); end.  

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