Первые слова маленького брата были "мама" и "папа". какова мощность используемого братом алфавита?
208
347
Ответы на вопрос:
Const n = 3; var a: array[1..n] of integer; i, x: integer; begin x: =0; for i: =1 to n do begin read(a[i]); if a[i] mod 2 = 0 then x: =x+1; end; if 2*x > = n then for i: =1 to n do begin a[i]: =a[i]*2; writeln(a[i]); end else for i: =1 to n do begin a[i]: =a[i]+1; writeln(a[i]); end; end.
Популярно: Информатика
-
GagarinPSK06.06.2022 15:12
-
alex225898517.08.2020 10:37
-
nut5621.03.2021 18:48
-
Lonikqq22.09.2022 23:29
-
07052003117.08.2021 10:43
-
sirozazuruhin24.03.2021 02:15
-
kate82310.06.2021 16:32
-
dribinl4129.04.2020 18:48
-
arsenagadzhanin09.10.2020 14:26
-
kseniyapolozhe04.01.2022 18:16