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

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

  • Philipton

    2017-08-27 00:12:42

    http://ukrnovosti.com.ua/...

  • EdwardJet

    2017-08-27 00:12:41

    http://ukrnovosti.com.ua/...

  • WilliamPreva

    2017-08-27 00:12:36

    http://ukrnovosti.com.ua/...

  • RodgerLak

    2017-08-26 15:05:16

    Hello. And Bye....

  • Ogona11

    2017-08-26 13:06:42

    http://support.myyna.com/46809/order-amiloride-5mg-cheap-amiloride-where-to-order-online, http://ossbible.com/1917/commander-amiloride-generique-livraison-amiloride-generique http://q.rec-sys.net/index.php?qa=3998&qa_1=amiloride-rabais-sur-internet-site-fiable-frumil-pas-cher-net, order amiloride canada, http://snopeczek.hekko.pl/194984/achat-amiloride-en-ligne-vente-acheter-du-frumil-5-pas-cher http://ggwadvice.com//index.php?qa=8438&qa_1=farmacia-amiloride-seguridad-venezuela-comprar-amiloride, http://faq...

  • AgapiyaPr

    2017-08-25 23:35:16

    Сборник рецептов старинной укаинской кухни http://vseest.pp.ua/recept/ukr/...

  • FXBrokerMEK

    2017-08-25 09:49:54

    Valiutos maklerių reitingas. http://fx-brokers-review.com/index_lt.html...

  • BradyByday

    2017-08-24 17:21:31

    [url=http://uchetunet.su/%D0%A1%D1%87%D0%B5%D1%82%D1%87%D0%B8%D0%BA%D0%B8/%D0%AD%D0%BB%D0%B5%D0%BA%D1%82%D1%80%D0%B8%D1%87%D0%B5%D1%81%D0%BA%D0%B8%D0%B5/%D0%BC%D0%BE%D0%B4%D0%B5%D0%BB%D0%B8-%D1%81%D1%87%D0%B5%D1%82%D1%87%D0%B8%D0%BA%D0%BE%D0%B2-%D1%81-%D0%]электросчетчики с пультом [/url] - газовый счетчик с пультом, электрический счетчик с пультом управления....

  • ThomasTof

    2017-08-24 10:58:38

    Что такое электрический теплый пол? Электрический теплый пол - это система отопления, в которой в качестве нагревательного элемента используется электрический кабель. Такие теплые полы являются простым и эффективным решением для обогрева квартиры или дома. Теплый пол не требует установки дополнительного оборудования, весьма экономичен и не нуждается в особом техническом обслуживании. Теплый пол может быть как основной, так и дополнительной системой отопления - то есть теплый пол можно использовать совместно с другими обогревательными приборами...

  • Josephbit

    2017-08-23 17:33:03

    Сделать маникюр можно здесь [url=http://french-foto.ru/]french-foto.ru[/url]...