В задании представлены только 2 операции:
Конъюнкция (/\, *, &, логическое умножение) и дизъюнкция (\/, +, логическое сложение).
Порядок выполнения как в математике, сперва умножение (^) потом сложение (\/). И не стоит забывать что в первую очередь выполняются действия в скобках.
Таким образом:
1) (1 \/ 1) \/ (1 \/ 0) = 1 \/ 0 = 1
2) (((1 \/ 0) \/ 1) \/ 1) = ((1 \/ 1) \/ 1) = 1 \/ 1 = 1
3) (0 & 1) & 1 = 0 & 1 = 0
4) 1 & (1 & 1) & 1 = 1 & 1 & 1 = 1 & 1 = 1
5) ((1 \/ 0) & (1 & 1)) & (0 \/ 1) = (1 & 1) & 1 = 1 & 1 = 1
6) ((1 & 1) \/ 0) & (0 \/ 1) = (1 \/ 0) & 1 = 1 & 1 = 1
7) ((0 & 0) \/ 0) & (1 \/ 1) = (0 \/ 0) & 1 = 0 & 1 = 0
8) (A \/ 1) \/ (B \/ 0) = 1 \/ B = 1
9) ((1 & A) \/ (B & 0)) \/ 1 = (A \/ 0) \/ 1 = A \/ 1 = 1
10) 1 \/ A & 0 = 1 \/ 0 = 1
Var
a,b,c,d: integer;
begina:=-6;
b:=2;if a>b then
c:=a-b
else
c:=a*b;
d:=1;while c<a do begin
d:=d+1;
c:=c+1;
end;
writeln('Значение d = ',d,'.');
writeln('Значение c = ',c,'.');
end.
Паскаль. d = 7. c = -6.
Значение S есть просто знак числа x.
Это стандартная математическая функция.
В школе записывается как sign(x).
Блок схема будет в один блок - вернуть sign(x).
Процедура в MS Excel будет такой
=ЗНАК(B1)
про эту функцию можно прочитать тут
https://support.office.com/ru-ru/article/%D0%97%D0%9D%D0%90%D0%9A-%D1%84%D1%83%D0%BD%D0%BA%D1%86%D0%...
Program prog;
uses crt;
var
a,b,c,s:real;
begin
write('катет a = ');
readln(a);
write('катет b = ');
readln(b);
writeln;
c:=sqrt(sqr(a)+sqr(b));
s:= (a*b)/2;
writeln('Гипотенуза с = ', c:0:3);
writeln('S = ', s:0:3);
end.
Var s,i:integer;
begin
for i:=100 to 999 do
begin
if ((i mod 100 div 10)mod 2=0) and ((i mod 100 div 10)<>0)
then writeln (i);
s:=s+i;
end;
writeln (s,' сумма всех таких чисел');
end.
