Чему равно значение логической функции F = -(A V-B &С), при следующих значениях логических переменных:
А = 0
В = 0
C = 1
201
461
Ответы на вопрос:
Var a, b: integer; begin readln(a); while (inttostr(a).length > 1) do begin b : = 0; foreach c: char in inttostr(a) do b += strtoint(c); a : = b; end; writeln(b); end.=======================var a, b, e: integer; d: string; begin readln(a); d : = inttostr(a); while (length(d) > 1) do begin d : = inttostr(a); b : = 0; for e : = 1 to length(d) do b += strtoint(d[e]); a : = b; end; writeln(b); end.
Популярно: Информатика
-
nastya274018.03.2020 08:14
-
margo123613.03.2021 16:08
-
ivan20030217.04.2020 23:47
-
BegimaiAnarkulova12.03.2021 23:35
-
Аня19982325.07.2022 21:58
-
Androidekstas22.05.2022 12:11
-
Вета11111111111103.06.2022 20:40
-
Пенелопа218924.04.2020 14:56
-
АлинаЛог23.05.2023 03:26
-
Niktommy13.07.2021 08:33