program raf105;
const
N = 10;
var
a,b: array[1..N] of integer;
x: boolean;
begin
for var i:=1 to N do
begin
a[i]:= random(15);
b[i]:= random(15);
end;
writeln('A: ',a);
writeln('B: ',b);
write('Вывод: ');
for var i:=1 to N do
begin
x:= False;
for var j:=1 to N do
if a[i] = b[j] then x:= True;
if not(x) then write(a[i],', ');
end;
end.
<h3>PascalABC</h3>
Основание системы счисления = 3:
120(3) = 1*3^2+2*3 = 9+6 = 15
110(3) = 1*3^2+1*3 = 9+3 = 12
1000(3) = 1*3^2 = 27
15+12=27
Ручка - шариковая ручка, ручка ребёнка, дверная ручка.
Киви - продукт Киви, птица Киви