<em>// PascalABC.NET 3.3, сборка 1583 от 25.11.2017</em> <em>// Внимание! Если программа не работает, обновите версию!</em>
begin var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println; var im:=a.IndexMax; Writeln('Номер максимального элемента- ',im+1,', значение ',a[im]); end.
На картинке: Компьютер (интернет ресурсы); Книги (литература). Также, информацию можно найти в библиотеках, архивах, в научных центрах и через общение( можно получить информацию).