Есть ответ 👍

Номер 2. Исправьте ошибки в следующих фрагментах программ

225
476
Посмотреть ответы 1

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


Var       n, i, k: integer;       f: boolean; begin       readln(n);       f : = false;             for i : = 1 to n do       begin               k : = random(100);               f : = f or (k mod 4 = 0);       end;             writeln(f); end.

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