Var m:array of integer;
a,b,i,n,min,max:integer;
begin
readln(n,a,b);
setlength(m,n);
n-=1;
a-=1;
b-=1;
max:=a;
min:=a;
for i:=0 to n do begin
read(m[i]);
if (i>=a) and (i<=b) and (m[i]>m[max]) then max:=i;
if (i>=a) and (i<=b) and (m[i]<m[min]) then min:=i;
end;
writeln('Min ',m[min],' Max ',m[max]);
<span>end.</span>
Как нужно обращятся с компом ?
В ходе развития компьютеров и компьютерных технологий можно выделить несколько значительных событий, определивших в свое время основные направления их дальнейшего развития:
1640-е гг. — изобретение Б. Паскалем механического устройства, с помощью которого можно было складывать числа;
Конец XVIII в. — создание Г. В. Лейбницем механического устройства, позволяющего не только складывать, но и умножать числа. 1946 г. считается годом изобретения первых универсальных электронных вычислительных машин (ЭВМ). В этом году американскими учеными Дж. фон Нейманом, Г. Голдстайном и А. Еернсом была опубликована статья, в которой излагались основополагающие принципы создания универсальной ЭВМ. Уже в конце 40-х гг. начали появляться первые опытные образцы подобных машин, которые условно называются ЭВМ первого поколения. Эти ЭВМ были сконструированы на основе электронных ламп, уступая по своей производительности даже современным калькуляторам.
В дальнейшем развитии ЭВМ выделяют следующие этапы:
Второе поколение ЭВМ, связанное с изобретением транзисторов;
Третье поколение ЭВМ, связанное с изобретением интегральных схем;
Четвертое поколение ЭВМ, связанное с появлением микропроцессоров в 1971 г.
Первые микропроцессоры были выпущены фирмой «Intel», что и стало толчком к разработке нового поколения персональных ЭВМ. Дальнейший выпуск и повсеместное внедрение персональных компьютеров было осуществлено фирмой «Apple Computer», начавшей в 1977 г. выпуск персональных компьютеров «Apple».
В связи с возникшим в обществе массовым интересом к персональным ЭВМ компания «IBM» (International Business Machines Corporation) приступила к созданию нового проекта персонального компьютера.
Фирма «Microsoft» получила заказ на разработку программного обеспечения для эгого компьютера. Проект был завершен в августе 1981 г., и новый персональный компьютер получил название IBM PC.
Разработанная модель персональной ЭВМ произвела настоящую информационную революцию и очень быстро вытеснила с рынка все прежние модели персональных компьютеров на последующие несколько лет.
Компьютер IBM PC положил начало выпуску стандартных IBM PC-совместимых компьютеров, составляющих большую часть современного рынка персональных компьютеров.
Помимо IBM PC-совместимых компьютеров, существуют и другие разновидности ЭВМ, позволяющие решать задачи различной сложности во всевозможных обл
Program z1;
var a:array[1..10] of byte;
i,j,k,r:byte;
begin
randomize;
for i:=1 to 10 do begin
a[i]:=random(100);
write(a[i],' ');
a[i]:=(a[i] div 10)+(a[i] mod 10)
end;
k:=1;writeln('');
for j:=0 to 18 do begin
i:=k;
while i<=10 do begin
if a[i]=j then begin
r:=a[k];a[k]:=a[i];a[i]:=r;
write(a[k],' ')
end;
i:=i+1
end
end;
readln
end.