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

програми
Задача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

  • Justinexpag

    2017-04-20 14:18:46

    Очень много полезного о моде и красоте [url=http://dom-lady.ru]dom-lady.ru[/url]...

  • RandallFeand

    2017-04-19 14:49:21

    Паки идти [url=https://diabetik.guru/recipe/recepty-dlya-diabetikov-1-tipa.html]рецепты для диабетиков[/url] полторы тысячи лет рано нашей эры древние египтяне в своем медицинском [url=https://diabetik.guru/recipe/recepty-dlya-diabetikov-1-tipa.html]рецепты для диабетиков[/url] трактате «Бумага Эберса» описывали привлекательный диабет, примерно самостоятельное заболевание. Великие врачи Древней Греции и Рима ежемгновенно размышляли относительный этой загадочной болезни. Лекарь Аретаиус придумал ей слово «диабет» — по-гречески «протекаю, прохожу после»...

  • Curtisnilla

    2017-04-18 22:08:07

    [url=http://monitoringtransporta.ru/]мониторинг транспорта[/url]...

  • CharlesEffed

    2017-04-18 07:07:23

    Очень много полезного о здоровье, моде и красоте на [url=http://ladysarafan.ru]ladysarafan.ru[/url]...

  • JosephAdemo

    2017-04-18 00:36:55

    Женский журнал здесь [url=http://laform.ru/]laform.ru[/url]...

  • Richard93464

    2017-04-17 02:08:44

    Ivan Tea - a comprehensive solution to provide the body with nutrients and antioxidants. [url=http://koporskiytea24.com/]Click here!..[/url]...

  • pillsnomb

    2017-04-16 09:25:55

    Take on cheap pills without Rx, Discount!, [url=http://farra-dneeta.mhs.narotama.ac.id/2016/11/30/get-at-an-easy-rate-medications-no-prescription/]pills[/url]...

  • TracyHorne

    2017-04-16 05:16:59

    wh0cd915891 [url=http://sildenafilnorx.us.com/]sildenafil pills[/url] [url=http://prozacnorx.us.com/]prozac no rx[/url] [url=http://propecianorx.us.com/]propecia no rx[/url]...

  • AaronPinge

    2017-04-16 02:23:44

    wh0cd924971 [url=http://cialisprofessional.us.com/]buy cialis[/url]...

  • TracyHorne

    2017-04-16 02:09:39

    wh0cd819996 [url=http://prozacnorx.us.com/]PROZAC TABLETS[/url] [url=http://propecianorx.us.com/]PROPECIA SALE[/url] [url=http://sildenafilnorx.us.com/]sildenafil[/url]...