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

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

  • Kennethrig

    2017-06-04 12:45:28

    wh0cd129820 [url=http://levaquin-365.gdn/]levofloxacin[/url] [url=http://nexium500.top/]nexium dr[/url] [url=http://buyadalat2017.top/]buy adalat[/url]...

  • Bennydip

    2017-06-04 09:16:15

    wh0cd163776 [url=http://nexium24.us.org/]NEXIUM ONLINE[/url] [url=http://synthroid24.us.org/]SYNTHROID[/url]...

  • Bennydip

    2017-06-04 07:46:18

    wh0cd109416 [url=http://cipro.us.com/]cipro[/url] [url=http://viagrasoft.us/]Viagra Soft[/url] [url=http://nexium2017.us.com/]click here[/url] [url=http://buy-indocin.com/]CHEAP INDOCIN[/url]...

  • Alfredpal

    2017-06-04 07:38:03

    wh0cd358580 [url=http://cialisonline247.us.org/]Cialis Mastercard[/url]...

  • Kennethrig

    2017-06-04 07:15:06

    wh0cd923715 [url=http://buymotilium16.top/]motilium suspension[/url] [url=http://buyclindamycin6.gdn/]buy clindamycin[/url] [url=http://avodart9.top/]avodart[/url] [url=http://buycafergot-0.top/]buy cafergot[/url] [url=http://buysildenafil5.top/]buy sildenafil[/url]...

  • сиалис купить Hob

    2017-06-04 05:45:16

    Как действует сиалис сиалис купить http://stoyakviagra.menshealthed.ru Быть диагностике данного заболевания важную роль играет характер травмы. Поэтому, может иметься для вас уже приходилось брать Виагру в аптеке либо вы только намереваетесь приобрести Сиалис в Воронеже либо приобрести Левитру, в любом случае, круг вынужден быть обоснованным и естественно же очень гнушаться чтением аннотации перед применением Виагры, Левитры и Сиалиса. Для обеспечения активного отдыха опосля мышечной работы используются различные средства...

  • DerekLor

    2017-06-04 05:23:18

    http://банки-кредиты.москва/ forum rambler board google forum rambler forum forum board rambler xn----7sbcoeqdlc0a1b1a1j.xn--80adxhks yandex google board forum google dom2.vip...

  • Bennydip

    2017-06-04 04:42:19

    wh0cd696 [url=http://costofviagra24.us.org/]cost of viagra[/url]...

  • Alfredpal

    2017-06-04 04:30:59

    wh0cd249858 [url=http://seroquel17.top/]seroquel[/url] [url=http://buylipitor3.gdn/]buy lipitor[/url] [url=http://clomid2015.gdn/]clomid[/url] [url=http://buyprovera2014.gdn/]provera[/url]...

  • Alfredpal

    2017-06-04 02:58:16

    wh0cd195498 [url=http://sildenafilcitrate247.us.org/]sildenafil 100mg price[/url] [url=http://synthroid247.us.org/]buy synthroid[/url]...