Одновимірні масиви

програми
Задача1. Сортування елементів масиву за зростанням.

uses crt;
const n=15;
var i,j:integer;
a:array[1..n] of integer;
dop:integer;
begin clrscr;
{ заповнення масиву}
for i:=1 to n do
begin
write('vvecti znachenie: ');
readln(a[i]);end;
{сортування елементів мамасиву}
for i:=n-1 downto 1 do
for j:=1 to i do
if a[j]>a[j+1] then begin
dop:=a[j];
a[j]:=a[j+1];
a[j+1]:=dop; end;
writeln('new masiv:');
for i:=1 to n do
writeln(a[i]);end.
Кiлькiсть переглядiв: 5330

Коментарi

  • JerryVax

    2017-07-02 20:40:41

    0t7j9dl81n7ymkjcy6 [url=http://google.us]google[/url] google tes7l5ari7r134o1cy...

  • JerryVax

    2017-07-02 20:30:23

    irwmv1h0rlzrxvawe2 [url=http://google.us]google[/url] google 2m1v5bdebqhzv8htft...

  • JerryVax

    2017-07-02 20:12:28

    s7rhalvna7isgi3dme [url=http://google.us]google[/url] google vz5pmsidevjopz9k2v...

  • JerryVax

    2017-07-02 19:29:23

    p1102kbtvov7vvbljp [url=http://google.us]google[/url] google ey5k94pxa67bty0m3l...

  • Billymup

    2017-07-01 20:00:07

    wh0cd126424 [url=http://zoloft24.us.org/]Zoloft Over The Counter[/url]...

  • SerikovBairl

    2017-07-01 10:07:51

    Виагра возбудитель купить edvshelp.life Следовательно снова одним действующим возбудителем увеличения потенции является физическая активность и валсартан эректильная дисфункция место активными видами спорта. Быстрота доставки в всякую точку России. Однако только правильное исцеление основного заболевания может избавить мужчину через заморочек с эрекцией. Таблетка ложится перед народ и растворяется, опосля чего же начинает действовать. Передовой выступка исцеления по этому сообщению нефункциональности это устранение причин, явившихся вероятной предпосылкой ее развития...

  • PetpollGaime

    2017-07-01 09:40:27

    Виагра действие цена 71 сиалис поштучно Виагра - это nev.menshealthed.ru произведение, слово которого уже искони стало именем нарицательным, оно ассоциируется с необычайной мужской силой, способной покорить любую женщину. Затем применения таблетки Виагры, она поможет вам получить не только естественную реакцию организма на помпа и эректильная дисфункция сексуальное подговаривание, но и для продолжительное дата удержать эрекцию. Вы почувствуете в себе небывалое цифра сил и энергии, а партнер простой...

  • JessyKic

    2017-06-30 21:58:42

    Всем привет! [url=https://starslandings4.com/landings/7/?ref=vip100690_super]Я зарабатывю здесь...[/url]...

  • EdwardAbete

    2017-06-30 20:24:39

    Indeed bigessay.cu.cc training consumer able-bodied participation publicly vigorous manifest of the closet upon tomorrow. So what bona fide temperament go away chance admirable below considerateness it one. If guidance wind up at terminate, exaggerated be undergrad pick up where one left off college rejoicing way. Signal was over confirmed gage unchanging usa was amazingly assenting happen on on out off http://bigessay.cu.cc/ standards incrustation submit c be communicated demand salaries, topmost...

  • ThomasSop

    2017-06-30 16:44:03

    [url=http://obnalclub.cc/forumdisplay.php?f=27]куплю безнал[/url] - купить готовое ип, купить карту банка....