Все решения даны в системе программирования PascalABC.NET 3.2, сборка 1382 от 06.02.2017
Если программа не работает, обновите версию!
№1 begin var a:=ReadArrInteger('Вводите числа:',ReadInteger('n=')); var im:=a.IndexMax; Writeln('Максимальный элемент номер ',im+1,' равен ',a[im]) end.
Пример n= 6 Вводите числа: 13 8 -15 0 16 -24 Максимальный элемент номер 5 равен 16
№2 begin var a:=ReadArrInteger('Вводите числа:',ReadInteger('n=')); Sort(a,(x,y)->x>y); a.Println end.
Пример n= 5 Вводите числа: 5 -4 6 0 5 6 5 5 0 -4
№3 begin var a:=ArrRandom(ReadInteger('n='),-54,33); a.Println; Sort(a,(x,y)->x>y); a.Println end.
1) Внутренняя нужно для временного хранения программ во время работы компьютера, Внешняя нужно для долгого хранения данных 2) Принцип заключается в том, что команды представляются в битовой форме и хранятся в том же Оперативном Запоминающем Устройстве, что и обрабатываемые данные. 3) Дискретные объекты состоят из отдельных частиц. Например: дом дискретен так как состоит из кирпичей Память состоит из отдельных ячеек – битов. 4) первый вопрос) наименьшая единица измерения информации. второй вопрос) краткое прилагательное, образованное от глагола бить. 5) Во внутренней памяти компьютера все байты пронумерованы. Нумерация начинается с нуля. Порядковый номер байта называется его адресом. Занесение информации в память, а также извлечение ее из памяти, проводится по адресам.
PascalABC.NET 3.2, сборка 1382 от 06.02.2017
Если программа не работает, обновите версию!
№1
begin
var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
var im:=a.IndexMax;
Writeln('Максимальный элемент номер ',im+1,' равен ',a[im])
end.
Пример
n= 6
Вводите числа: 13 8 -15 0 16 -24
Максимальный элемент номер 5 равен 16
№2
begin
var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
Sort(a,(x,y)->x>y);
a.Println
end.
Пример
n= 5
Вводите числа: 5 -4 6 0 5
6 5 5 0 -4
№3
begin
var a:=ArrRandom(ReadInteger('n='),-54,33); a.Println;
Sort(a,(x,y)->x>y); a.Println
end.
Пример
n= 14
-2 2 -10 17 18 -3 24 -30 -42 12 -11 -53 13 21
24 21 18 17 13 12 2 -2 -3 -10 -11 -30 -42 -53
№4
begin
var a:=ReadArrInteger('Вводите числа:',ReadInteger('n='));
var b:=a.Where(x->x>0); b.Println
end.
Пример
n= 14
Вводите числа: -2 2 -10 17 18 -3 24 -30 -42 12 -11 -53 13 21
2 17 18 24 12 13 21
2) Принцип заключается в том, что команды представляются в битовой форме и хранятся в том же Оперативном Запоминающем Устройстве, что и обрабатываемые данные.
3) Дискретные объекты состоят из отдельных частиц. Например: дом дискретен так как состоит из кирпичей Память состоит из отдельных ячеек – битов.
4) первый вопрос) наименьшая единица измерения информации.
второй вопрос) краткое прилагательное, образованное от глагола бить.
5) Во внутренней памяти компьютера все байты пронумерованы. Нумерация начинается с нуля. Порядковый номер байта называется его адресом. Занесение информации в память, а также извлечение ее из памяти, проводится по адресам.