Получив рекордный результат, я ввёл с своё имя и распечатал на принтер список рекордсменов.нужно вставить слово связанное с компьютером (11букв)

Клавиатуры                        

Отношение объектов и множеств. отношение - это взаимная связь, в которой находятся какие либо объекты. виды отношений: 1) объект-объект 2) объект-множество 3) множество-множество отношения множеств можно легко показать с кругов эйлера. виды отношений между множествами: 1) множества пересекаются. это значит,что у множеств есть общие единицы. например, множество людей, говорящих на башкирском и множество людей, говорящих на . но есть люди, говорящие на двух языках. это и есть пересечение множеств. 2) множества не пересекаются. это значит,что у множеств нет одинаковых частей, они не пересекаются. 3) множества равны это значит, что элементы в двух мнлжествах одинаковы 4) подмножество бывает так, что в одном множестве есть ещё одно множество. оно называется подмножество. например: множество людей, а у него подмножество дети.

Var   a,b,c,min: integer; begin write('введите a: '); readln(a); min: =a; write('введите b: '); readln(b); if b< min then min: =b; write('введите c: '); readln(c); if c< min then min: =c; writeln('наименьшее: ',min); end.для vbasub z()dim a as integerdim b as integerdim c as integerdim min as integera = inputbox("введите  a: ") min = ab = inputbox("введите  b: ")if b < min then min = bc = inputbox("введите  c: ")if c < min then min = cmsgbox ("наименьшее: " & min)end subдля наибольшегоsub z() dim a as integer dim b as integer dim c as integer dim max  as integer a = inputbox("введите  a: ") max= a b = inputbox("введите  b: ") if b > max  then  max  = b c = inputbox("введите  c: ") if c > max  then  max  = c msgbox ("наибольшее: " &   max  ) end sub