Апельсиновое яйцо. состав: скорлупа, дольки, желток.
действия: разбить скорлупу, достать дольки и полить их желтком
Сместиться в точку (2,0)
опустить перо
сместиться в точку (0,5)
сместиться в точку (4,3)
сместиться в точку (3,0)
<span>сместиться в точку (5,6)
</span><span>сместиться в точку (7,0)
</span><span>сместиться в точку(8,0)
</span><span>сместиться в точку (10,5)
</span><span>сместиться в точку (6,3)
</span><span>сместиться в точку (7,0)
</span><span> сместиться в точку(8,0)
</span><span>сместиться в точку(2,0)</span>
=> - это, видимо, операция "импликация"
Таблица истинности для нее:
a b a=>b
0 0 1
0 1 1
1 0 0
1 1 1
Теперь рассмотрим выражение: A=>(B=>A)
A B B=>A <span>A=>(B=>A)
0 0 1 1
0 1 0 1
1 0 1 1
1 1 1 1</span>
Var a: array[0..49] of Integer; sr:real;sum,i,n: integer;beginwriteln('Исходный массив');for i:=0 to 49 do begina[i]:=Random(300);write(a[i]:4);if a[i] mod 2 = 0 then begin sum:= sum + a[i]; n:= n +1; end;end;sr:= sum / n;writeln;writeln('Cреднее арифметическое значение четных ',sr);end.