1 задача.
Условие:
a, b, c: integer;
mas: arrat [0..9] of byte;
Сделать следующие действия:
1. (a AND b) + c, при a+b>0 ( плюс перед c в кружочке, т.е. это исключение ИЛИ - операция неравнозначности)
2. mas[i]:=i^3, при a+b=0
3. mas[i]:=1, при а+b<0

2 задача.
Условие:
mas: array [0..15] of smallint
Сделать следующие действия:
1. mas1[i]:=i/2+1
2. mas2[i]:=mas1[i]
3. mas3[i]:=(mas2[i]+mas1[i])/2

Выручите пожалуйста sad.gif