Определите значение переменной "c" после выполнения фрагмента алгоритма: Подпись отсутствует
а 8
б 1
в 32
г 64
299
479
Ответы на вопрос:
Program n1; var n: integer; function per(n: integer ): integer; var a: array[1..500] of integer; i,c: integer; begin c: = 0; repeat c: = c + 1; a[c]: = n mod 2; n: = n div 2; until n = 0; for i: = c downto 1 do write(a[i]); end; begin write('введите число: '); readln(n); per(n); end.
Популярно: Информатика
-
SokhraNNaya24.04.2023 00:26
-
Vikamolch1126.02.2022 22:17
-
Anzhelika062427.04.2020 06:41
-
Love101103.02.2021 14:06
-
BOULEVARDDEPO11106.04.2020 05:17
-
anelochka30.11.2021 04:34
-
kuanyshbek200326.01.2021 19:54
-
Kvodan12321.08.2022 03:02
-
alanragibov0215.09.2022 11:17
-
bartosz0421.09.2021 21:07