(М.В. Кузнецова) Определите, при каком наибольшем введённом значении переменной s программа выведет число 256. s = int(input()) n = 1 while s <= 45: s = s + 4 n = n * 2 print(n)
1) F=Av(¬A&B) По закону дистрибутивности раскроем скобки (Av¬A)&(AvB) Av¬A = 1, значит остаётся AvB
2) F =A&(¬AvB) По тому же закону раскрываем скобки (A&¬A)v(A&B) A&¬A = 0, значит остаётся A&B
3. (AvB)&(¬BvA)&(¬CvB) По закону склеивания (AvB)&(¬BvA) = A , получается, что выражение принимает вид A&(¬CvB) Можно раскрыть скобки, получим A&¬C v A&B
4) F =(1v(AvB))v((AC)&1) Скобка (1v(AvB)) = 1, так как 1 v ЧТОУГОДНО = 1 Получаем выражение 1v((AC)&1) = 1, так как 1 v ЧТОУГОДНО = 1 ответ 1
Var mas:array[1..1000, 1..1000] of integer; N,M,i,j,k:integer;
Begin Writeln('Введите размер матрицы N*M'); Write('N = '); readln(N); Write('M = '); readln(M);
if (M>1000) or (N>1000) or (M<1) or (N<1) then Writeln('Ошибка, указанные значения выходят за пределы матрицы') else Begin Writeln('Введите элементы матрицы');
k:=0; for i:=1 to N do for j:=1 to M do Begin readln(mas[i,j]); if (mas[i,j] mod 2 = 0) then k:=k+1; end;
Writeln(); Writeln('Исходная матрица');
for i:=1 to N do Begin for j:=1 to M do Begin Write(mas[i,j], ' ') end; Writeln(); end;
Writeln(); Writeln('Количество четных элементов = ',k); end;
ответ: при s = 17
s = 0 | n = 4096
s = 1 | n = 4096
s = 2 | n = 2048
s = 3 | n = 2048
s = 4 | n = 2048
s = 5 | n = 2048
s = 6 | n = 1024
s = 7 | n = 1024
s = 8 | n = 1024
s = 9 | n = 1024
s = 10 | n = 512
s = 11 | n = 512
s = 12 | n = 512
s = 13 | n = 512
s = 14 | n = 256
s = 15 | n = 256
s = 16 | n = 256
s = 17 | n = 256
s = 18 | n = 128
s = 19 | n = 128
s = 20 | n = 128
s = 21 | n = 128
s = 22 | n = 64
s = 23 | n = 64
s = 24 | n = 64
s = 25 | n = 64
s = 26 | n = 32
s = 27 | n = 32
s = 28 | n = 32
s = 29 | n = 32
s = 30 | n = 16
s = 31 | n = 16
s = 32 | n = 16
s = 33 | n = 16
s = 34 | n = 8
s = 35 | n = 8
s = 36 | n = 8
s = 37 | n = 8
s = 38 | n = 4
s = 39 | n = 4
s = 40 | n = 4
s = 41 | n = 4
s = 42 | n = 2
s = 43 | n = 2
s = 44 | n = 2