Регистрация
mariael10
25.08.2020 16:40
Информатика
Есть ответ 👍

Задана линейная таблица состоящая из целых чисел. определить есть ли в этой таблице хотя бы одно число кратное k

145
443
Посмотреть ответы 2

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

ekaterina20122
ekaterina20122
4,6(66 оценок)
Program z;     const n=10;     var i,k: integer;           a: array[1..n] of integer; begin     writeln('введите k');       readln(k);         i: =1;       while (i< =n) and (a[i] mod k< > 0) do i: =i+1;       if i< =n then writeln ('число, кратное, ',k,', есть')       else ('числа, кратного  ',k,', нет');       readln end.
сом38
сом38
4,8(52 оценок)
1) (a & 0) ∨ 1 = 0 ∨ 1 = 12) a → a ∨ 0 = (¬a ∨ a) ∨ 0 = 1 ∨ 0 = 13) (1 ⊕ 1) → a =  0 → a = ¬0 ∨ a = 1 ∨ a = 1

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