Напишите НАИБОЛЬШЕЕ число х, для которого ИСТИННО высказывание: (x<8) И НЕ(x кратно 3) И (x четное)
237
479
Ответы на вопрос:
Var a: array[1..8] of integer; i,k: integer; begin for i: =1 to 8 do begin a[i]: =random(1,10); write(a[i],' '); end; for i: =1 to 8 do if a[i] mod 2=0 then k: =k+1; wrieln(k); end.
Популярно: Информатика
-
Еденарог04.05.2022 19:23
-
bgdadanilenko2029.08.2021 08:10
-
stru4kovav1314.04.2021 00:47
-
tisochkin12329.02.2020 00:05
-
Jdhcb02.01.2023 05:22
-
mikhailsmirnov213.05.2020 11:52
-
TOLIK47474721.01.2023 07:04
-
kliza01080629.01.2020 02:32
-
pervushina24504.11.2020 19:07
-
Ксюша11111111111111330.01.2020 07:05