Компьютерная мышь - гаджет, без которого сложно представить управление компьютером. Первую компьютерную мышь создал Дуглас Энгельбарт в 1970 году. Если сейчас этот гаджет работает с сенсора на нижней части, то в на этом месте располагалось колесико, с которого и было возможно управлять курсором. Всего около двадцати лет назад мышь была с двумя небольшими кнопками и проводом. До этого кнопок было три. Позже появилось и колесо прокрутки, которое до сих пор остается на некоторых мышках. Инновацией является сенсорная мышь от Apple, на которой вовсе нет кнопок. Но не на всех современных мышках либо две кнопки, либо они просто отсутствуют. Сегодня уже невозможно представить игровую мышь без каких-либо дополнительных кнопок. Одна из особенностей современного гаджета - отсутствие провода. При покупке такой мыши покупатель получит два предметам - саму мышь и приемное устройство, для которого обязательно понадобится USB-вход.
Язык не указан, решение приводится на языке Pascal. Поскольку в стандарте языка не определена функция арккосинуса, используем для её вычисления следующую формулу:
const m=10; n=6; var a:array[1..m,1..n] of real; i,j,nn,np:integer; t:real; begin Randomize; Writeln('Исходный массив'); for i:=1 to m do begin for j:=1 to n do begin a[i,j]:=100*Random-50; Write(a[i,j]:4:0) end; Writeln end; Writeln('Преобразованный массив'); for i:=1 to m do begin for j:=1 to n do begin t:=i/(i+j); a[i,j]:=a[i,j]*arctan(sqrt(1-sqr(t))/t); Write(a[i,j]:8:3) end; Writeln end; Writeln('Количество положительных и отрицательных по столбцам'); for j:=1 to n do begin nn:=0; np:=0; for i:=1 to m do if a[i,j]>0 then Inc(np) else if a[i,j]<0 then Inc(nn); Writeln(np,nn:5) end end.
да мажна бува а не рабптпет
Объяснение: