Int i = ( ((x==y)||(y==z)||(z==x))&&( (x % 2 == 0)||(y % 2 == 0) )? 1 : 0 );
Var a:array[1..100] of integer;
i,s:integer;
begin
for i:=1 to 8 do begin
a[i]:=random(11)-0;
write(a[i]:4);
end;
s:=0;
for i:=1 to 8 do begin
if a[i] mod 2<>0 then
s:=s+1;
end;
writeln;
writeln(s);
end.
Var a,b,c,d,S:integer;
begin
readln(d);
S:=0;
a:=7;
b:=3;
c:=a+b;
if c>d then
S:=c-d
else
S:=d-c;
writeln(S);
end.
¬A∪ B - первая буква не гласная (согласная) или четвёртая согласная=
= первая или четвёртая буквы в имени согласные
подходят имена:
1 елеНа
2 Вадим
4 Фёдор
( не подходит антон, так как ни одна из 1 и 4 буквы
не согласные)