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

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

Коментарi

  • Bennydip

    2017-05-07 11:06:58

    wh0cd469540 [url=http://viagranoprescription.us.com/]viagra no prescription[/url] [url=http://amoxil3.us/]amoxil antibiotic[/url] [url=http://buy-cafergot.com/]Cafergot Pharmacy[/url]...

  • Alfredpal

    2017-05-07 10:29:00

    wh0cd163782 [url=http://triamterene.us.com/]buy triamterene[/url] [url=http://cipro.us.com/]cheap cipro[/url] [url=http://clonidine.us.com/]Clonidine[/url]...

  • Bennydip

    2017-05-07 09:53:31

    wh0cd415180 [url=http://celebrex.us.com/]celebrex 200mg price[/url]...

  • Kennethrig

    2017-05-07 07:30:47

    wh0cd109416 [url=http://hydrochlorothiazide911.gdn/]hydrochlorothiazide[/url] [url=http://buyzoloft-7.top/]link[/url] [url=http://buytetracycline365.top/]buy tetracycline[/url] [url=http://levitra2012.top/]livitra[/url] [url=http://medrol1.top/]medrol[/url] [url=http://tretinoin-2015.top/]tretinoin[/url]...

  • Bennydip

    2017-05-07 06:05:05

    wh0cd252096 [url=http://celebrexgeneric.us.com/]celebrex generic[/url] [url=http://priceofcialis.us.com/]Price Of Cialis[/url]...

  • Kennethrig

    2017-05-07 03:36:12

    wh0cd957686 [url=http://fluoxetine.us.com/]generic fluoxetine[/url] [url=http://cialisforsaleonline.us.com/]Cialis Online[/url] [url=http://clomid247.us.com/]CLOMID[/url]...

  • Alfredpal

    2017-05-07 02:27:29

    wh0cd870462 [url=http://buyavodart.us.org/]Avodart[/url] [url=http://revianorx.us.com/]buy revia[/url]...

  • Bennydip

    2017-05-07 01:10:24

    wh0cd89016 [url=http://buyelocon.casa/]elocon for eczema[/url] [url=http://inderal.news/]generic for inderal[/url] [url=http://citalopram.jetzt/]citalopram[/url]...

  • Kennethrig

    2017-05-07 00:14:58

    wh0cd794604 [url=http://propranolol2011.top/]propranolol[/url] [url=http://buybentyl247.us/]over the counter bentyl[/url] [url=http://proscar5.top/]proscar[/url]...

  • Alfredpal

    2017-05-06 23:30:19

    wh0cd761742 [url=http://cialisonlinepharmacy.us.com/]cialis online pharmacy[/url]...