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

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

Коментарi

  • Alfredpal

    2017-04-05 22:08:12

    wh0cd48086 [url=http://phenergan2017.bid/]phenergan[/url] [url=http://cialisgeneric2017.science/]cialis[/url] [url=http://antabuse17.science/]antabuse[/url] [url=http://motilium17.science/]motilium[/url] [url=http://prednisolone2017.science/]methylprednisolone[/url]...

  • EugeneTit

    2017-04-05 21:50:36

    wh0cd472724 [url=http://prozacnorx.us.com/]prozac over the counter[/url] [url=http://sildenafilnorx.us.com/]Order Sildenafil[/url]...

  • AaronPinge

    2017-04-05 21:47:47

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

  • Bennydip

    2017-04-05 21:47:35

    wh0cd568622 [url=http://vermox365.us.com/]vermox by mail[/url]...

  • TracyHorne

    2017-04-05 21:18:17

    wh0cd623471 [url=http://cialisprofessional.us.com/]cialis professional[/url] [url=http://prozacnorx.us.com/]prozac price[/url]...

  • Bennydip

    2017-04-05 20:13:08

    wh0cd536657 [url=http://buyaugmentin.us.com/]augmentin no script[/url]...

  • EugeneTit

    2017-04-05 19:44:26

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

  • Alfredpal

    2017-04-05 19:44:04

    wh0cd997972 [url=http://toprol.top/]Toprol[/url]...

  • CharlesHoups

    2017-04-05 18:46:19

    wh0cd678312 [url=http://cheaplevitra.review/]cheap levitra[/url] [url=http://buycelexa2014.us/]buy celexa online[/url] [url=http://buyhydrochlorothiazide17.top/]losartan hydrochlorothiazide[/url] [url=http://buypropecia2011.us/]propecia[/url]...

  • TracyHorne

    2017-04-05 18:24:21

    wh0cd527576 [url=http://propecianorx.us.com/]propecia no rx[/url] [url=http://cialisprofessional.us.com/]Cialis[/url]...