: постройте таблицу истинности для данного выражения.
если на рисунке непонятно: (a¬& c) - > b
если можно, то напишите на листке и сфотографируйте чтобы было понятнее..
буду
нужно!
222
491
Ответы на вопрос:
Const n=20; var a: array[1..n] of integer; m: array[2..5] of byte; i,k: integer; begin randomize; writeln('оценки: '); for i: =1 to n do begin a[i]: =random(4)+2; write(a[i],' '); end; writeln; for i: =1 to n do inc(m[a[i]]); writeln('статистика: '); for i: =2 to 5 do writeln(i,' - ',m[i]); end.
Популярно: Информатика
-
демлан27.01.2020 08:21
-
bhgd18.01.2022 23:45
-
nikpenkov0209.12.2020 04:51
-
КрохаДи26.07.2021 18:29
-
LedyKoshka10.11.2020 05:50
-
Vishenka33309.10.2022 21:25
-
olegtoda26.11.2020 05:00
-
мага0505122.03.2021 16:46
-
Элина1753916.06.2021 23:38
-
софия73011.05.2023 10:56