Отвечу на первый вопрос (всё-таки по правилам сайта вы должны задавать одно задание, иначе просто и вряд ли кто возьмётся, и решать будут долго, и ответ займёт кучу места).
Расставим в порядке убывания количества информации: 1) терабайт -это 1024 гигабайта (2^40 байт) 2) гигабайт -это 1024 мегабайта (2^30 байт) 3) мегабайт -это 1024 килобайта (2^20 байт) 4) килобайт -это 1024 байта (2^10 байт) 5) байт -состоит из 8 бит (8 двоичных разрядов) 6) бит и двоичный разряд -в них равное количество информации (это минимальное количество информации; бит может находится в двух различных состояниях, обозначаемых как ноль и единица)
Const n=8; var a:array[1..n,1..n] of integer; i,j,k,s,s1,si,dmin,smin:integer; begin Randomize; writeln('Исходный массив:'); for i:=1 to n do begin for j:=1 to n do begin a[i,j]:=random(50); write(a[i,j]:4); end; writeln; end; write('k = '); readln(k); s:=0; for j:=1 to n do s:=s+a[k,j]; writeln('s = ',s); dmin:=999999; smin:=999999; for i:=1 to n do if i<>k then begin s1:=0; for j:=1 to n do s1:=s1+a[i,j]; writeln('s',i,' = ',s1); if abs(s1-s)<dmin then begin dmin:=abs(s1-s); smin:=s1; si:=i; end; end; writeln('Номер строки = ',si,', smin = ',smin); end.
(4) Антилопа
Объяснение:
Жираф(Ф - согласная) ИЛИ (И - гласная) ИЛИ (Ж - согласная) = 1 ИЛИ 1 ИЛИ 1 = 1
Страус(С - согласная) ИЛИ (Т - не гласная) ИЛИ (С - согласная) = 1 ИЛИ 0 ИЛИ 1 = 1 ИЛИ 1 = 1
Индюк(К - согласная) ИЛИ (Н - не гласная) ИЛИ (И - не согласная) = 1 ИЛИ 0 ИЛИ 0 = 1 ИЛИ 0 = 1
Антилопа(А - не согласная) ИЛИ (Н - не гласная) ИЛИ (А - не согласная) = 0 ИЛИ 0 ИЛИ 0 = 0 ИЛИ 0 = 0