profile
Размещено 4 года назад по предмету Информатика от likliklik

Пользователь вводит длину и границы массива, программа выводит исходный массив, сортирует его по убыванию. Выводит на печать минимум и максимум, меняет их местами их местами в массиве и печатает его.

  1. Ответ на вопрос
    Ответ на вопрос дан igorvoloc
    program picaso; uses crt;var i,n,ls,ld,min,max,temp,k,j,f,aux:integer; a:array[1..10] of integer;begin clrscr; writeln('Vedite dlinu masiva');read(n); writeln('Vedite granitu s leva');read(ls); writeln('Vedite granitu s prava');read(ld); for i:=1 to n do  begin write('A[',i,']='); readln(a[i]); end; min:=a[1];max:=a[1]; repeat f:=1; for i:=ls to ld-1 do if a[i]<a[i+1] then  begin  aux:=a[i];  a[i]:=a[i+1];  a[i+1]:=aux;  f:=0;             end;    until f=1; for i:=ls to ld do write(a[i]:3); writeln; writeln('min: ',a[ls],' max: ',a[ld]); aux:=a[ls];  a[ls]:=a[ld];  a[ld]:=aux;  for i:=ls to ld do write(a[i]:3); end.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.