Turbo Pascal. Массивы

Массив – конечная группа переменных одного типа, которой присвоено общее имя.

Так, совокупность целых чисел

 -12, 14, 124, -1, 25 

можно считать массивом и обозначить одним именем, например A . Каждый элемент массива обозначается именем массива с индексом. В нашем случае имеется пять элементов, тогда, например, первый элемент и четвертый записываются следующим образом

 первый - A[1], четвертый - A[4]. 

Имя массива является единым для всех элементов. К каждому элементу массива можно обратиться с помощью индекса. Индекс – величина, характеризующая положение элемента относительно начала массива. Индекс записывается в квадратных скобках, например, A[1] , 1 – это индекс, указывающий на первый элемент массива с именем A .

Если в программе используется массив, то он должен быть описан или в разделе переменных Var , или в разделе типов Type .

Формат описания массива в разделе переменных:

 Var
:array[индекс] of

здесь : array (массив); of (из) – зарезервированные слова языка;  индекс – величина, характеризующая положение элемента относительно начала массива. В качестве индекса могут использоваться константы или данные целого, логического, символьного, перечисляемого и интервального типа (кроме Longint );  тип элементов – любой тип Турбо Паскаля.

Пример описания массива

Var
a:array[1..5] of integer;
b,c:array[1..20] of real;

В приведенном примере описаны три массива: a,b,c . В описании массивов содержатся следующие сведения: имена массивов – a,b,c ; тип элементов массивов: a – целые, b и c – вещественные; диапазон изменения индексов – 1..5 и 1..20 . Нижняя граница отделяется от верхней границы двумя точками. Две точки « .. » рассматриваются как единый неделимый символ. Нижняя граница показывает наименьшее значение индекса, верхняя – наибольшее. Значение нижней границы не может быть больше верхней. Массивы b и c имеют один и тот же тип и одинаковое количество элементов, поэтому описания можно объединить, разделив имена массивов запятой.

Выделение памяти для массивов производится раньше, чем выполняется какой-либо оператор программы, поэтому значения верхних границ массивов можно поместить в разделе констант.

Например:

Program example_2;
const n=20;
Var
b,c:array[1..n] of real;
Begin ...

Использование констант не только облегчает процесс изменения программы, но и делает его более надежным.

Массивы могут быть одномерными и многомерными. На практике, как правило, используют одномерные, двумерные и трехмерные массивы. Схематично одномерный и двумерный массивы можно представить таким образом:

Схема представления одномерного массива

 ris122

 

Схема представления двумерного массива

 ris123

В приведенной схеме массив A можно рассматривать как матрицу или таблицу и говорить, что A[i,j] – это элемент, находящийся в j -ом столбце i- ой строки этой матрицы.

Описание двумерного массива.

Const
m =10; n =20;
Var
b,c:array[1..m, 1..n] of real;

Поскольку в Турбо Паскале тип элементов массива может быть любой, в том числе и другим массивом, то помимо явного описания массивов в разделе переменных, существует и другая форма описания, через использование раздела типов. Последовательность описания и использования раздела Type следующая:

  • в разделе описания типов Type указывается тип массива;
  • в разделе описания переменной Var перечисляются массивы, относящиеся к указанному типу.

 Формат описания массивов:

Type<имя типа массива>=array[индекс] of <тип элементов>
Var
<имя массива>:<имя типа массива>

Пример:

Const
 n=10; m=20; 
Type 
mas=array[1..n,1..m] of real; 
Var 
a:mas ;

Если в программе несколько массивов, например, a,b,c,d, которые имеют тип mas , то изменяется только раздел описаний переменных:

Var
a,b,c,d:mas;

Тип массива mas формально введен только в разделе описания типов и нигде в программе не указывается и не обрабатывается.

При работе с массивами следует учитывать следующие правила:

  • над массивами не определены операции отношения. Нельзя писать

if a=b then ... 

  • сравнивать элементы массива можно поэлементно

for i:= 1 to 10 do 

if a[i]b[i] then ... 

  • при работе с массивами наиболее часто используется оператор цикла

For ... to ...do 

Примеры:

1. Всем элементам одномерного массива  a[1..10] присвоить нуль:

for i:= 1 to 10 do a[i]:=0; 

2. Всем элементам двумерного массива a[1..10,1..20] присвоить нуль:

 for i:= 1 to 10 do 

 for j:= 1 to 20 do 

 a[i,j]:=0; 

3. Всем элементам одномерного массива a[1..10] присвоить значения элементов массива b[1..10] :

 for i:= 1 to 10 do a[i]:=b[i]; 

ЗАДАЧА 1. Написать программу вычисления суммы пятнадцати чисел.

program a16;
Type
mas=array[1..15] of integer; {объявление типа массива}
Var
a:Mas; {объявление массива a типа mas}
i,sum:integer; {i-параметр цикла; sum-сумма чисел}
begin
sum:=0; {присваиваем начальное значение}
writeln(‘Введите 15 целых чисел:’);
for i:=1 to 15 do
begin
readln(a[i]); {ввод элементов массива}
sum:=sum+a[i]; {вычисление суммы}
end;
writeln(‘Сумма чисел равна:’, sum:6);
end.

Результаты работы программы:

 Введите 15 целых чисел 

 1 

 1 

 1 

 ... 

 1 

 Сумма чисел равна: 15 

ЗАДАЧА 2. Ввести с клавиатуры 15 вещественных чисел в массив и найти сумму этих чисел.

program a17;
Const n =15; {количество чисел}
Type
mas=array[1..n] of real;
Var
a:Mas;
i:integer; {параметр цикла}
sum:real; {сумма чисел}
begin
writeln(‘Введите ’, n:4,’ чисел’);
for i:=1 to n do
begin
write(‘a[‘,i,’]=’);
readln(a[i]); {ввод элементов массива}
end;
sum:=0; {присваиваем начальное значение}
for i:=1 to n do sum:=sum+a[i]; {вычисление суммы}
writeln;
writeln(‘Сумма равна:’, sum:8:2);
end.

Результаты работы программы:

Введите 15 чисел

a[1]=1

a[2]=1

a[3]=1

...

a[15]=1

Сумма равна: 15.00

ЗАДАЧА 3. Найти наибольший элемент массива и определить его номер. Количество элементов массива и их значения ввести с клавиатуры.

program a18;
Const n =100; {допустимое количество чисел}
Type
mas=array[1..n] of real;
Var
a:Mas;
m:integer; {количество чисел}
i:integer; {параметр цикла}
k:integer; {порядковый номер элемента массива}
max:real; {максимальный элемент массива}
begin
write(‘Введите количество чисел: ’);
readln(m);
writeln(‘Введите ’, m:4,’ чисел’);
for i:=1 to m do
begin
write(‘a[‘,i,’]=’);
readln(a[i]); {ввод элементов массива}
end;
max:=a[1]; k:=1; {берем первый элемент массива}
for i:=2 tom do {в цикле начиная со второго элемента просматриваем массив}
if a[i]>max then
begin
max:=a[i]; k:=i;
end;
writeln;
writeln(‘Номер наибольшего элемента:’,k:3);
writeln(‘Его значение:’,max:8:2);
end.

Результаты работы программы:

 Введите количество чисел: 5 

 Введите 5 чисел 

 a[1]=101.2 

 a[2]=11.4 

 a[3]=1.0 

 a[4]=304.7 

 a[5]=19.3 

 Номер наибольшего элемента: 4 

 Его значение: 304.70 

Добавить комментарий:

Комментарии  

geico
buy car insurance: carinsurance2019.us.org/ auto insurance cost: autoinsurance2019.us.com/
insurance companies
online car insurance quotes: carinsurance2019.us.org/
DenBus
propranolol online: propranolol40.com/ lipitor 40: lipitoratorvastatin.com/ buy zoloft without pres: genericzoloft.com/ diflucan: diflucan150.com/ generic strattera: stratteraatomoxetine.com/
auto club insurance
auto insurance quotes: autoinsurancequotes.us.org live chat: webcamsex.us.com
accurate automotive
car insurance: carinsurance2019.us.org/ cheapest car insurance available: autoinsurance2019.us.com/
aarp car insurance
college essay help: collegeessays.us.com cheap car insurance companies: cheapcarinsurance.us.org
JackBus
valtrex: valtrex500.com/ prednisolone: prednisolone5mg.com/ propranolol 80 mg: propranolol40.com/ furosemide: furosemide20.com/ buy elimite: elimite5.com/
EyeBus
propranolol 40mg: propranolol40.com/ order fluconazole 150 mg for men: diflucan150.com/ lipitor generic: lipitoratorvastatin.com/ strattera: stratteraatomoxetine.com/ zoloft: genericzoloft.com/
car insurance prices
low cost auto insurance: autoinsurance2019.us.com/
amica car insurance
car insurance: carinsurance2019.us.org/ auto insurance: autoinsurance2019.us.com/
best car insurance
auto insurance quote: autoinsurance2019.us.com/ geico car ins: carinsurance2019.us.org/
JackBus
buy lasix: lasix40.com/ allopurinol online: allopurinol100.com/ cafergot generic: cafergotmedication.com/ buy colchicine: colchicine6.com/ ventolin inhaler: ventolin90.com/
safe auto insurance
mexican auto insurance: carinsurance2019.us.org/ auto insurance: autoinsurance2019.us.com/
aaa auto insurance
eagle insurance: autoinsurance2019.us.com/ car insurance: carinsurance2019.us.org/
NickBus
lipitor: lipitoratorvastatin.com/ buy strattera without prescription: stratteraatomoxetine.com/ generic zoloft online: genericzoloft.com/ fluconazole 150mg order: diflucan150.com/ propranolol 10mg: propranolol40.com/
IvyBus
lipitor: lipitoratorvastatin.com/ propranolol er: propranolol40.com/ zoloft: genericzoloft.com/ diflucan for sale: diflucan150.com/ buy strattera without prescription: stratteraatomoxetine.com/
JimBus
atomoxetine: stratteraatomoxetine.com/ lipitor: lipitoratorvastatin.com/ propranolol 40: propranolol40.com/ buy diflucan 150mg: diflucan150.com/ zoloft: genericzoloft.com/
MiaBus
purchase diflucan online: diflucan150.com/ buy propranolol: propranolol40.com/ generic lipitor cost: lipitoratorvastatin.com/ generic for zoloft: genericzoloft.com/ strattera: stratteraatomoxetine.com/
AnnaBus
generic for zoloft: genericzoloft.com/ diflucan 150: diflucan150.com/ lipitor: lipitoratorvastatin.com/ strattera atomoxetine: stratteraatomoxetine.com/ propranolol 40 mg: propranolol40.com/
online car insurance
online car insurance instant quote: carinsurance2019.us.org/ thegeneral.com auto insurance: autoinsurance2019.us.com/
JimBus
purchase stattera: stratteraatomoxetine.com/ order sertraline online: genericzoloft.com/ propranolol: propranolol40.com/ diflucan medicine: diflucan150.com/ cheap lipitor generic: lipitoratorvastatin.com/
JoeBus
cephalexin 500mg: cephalexin500.com/ prozac forsale: fluoxetine20.com/ buy doxycycline: doxycycline100.com/ lipitor: lipitoratorvastatin.com/ buy viagra soft online: buyviagrasoft.com/
aaa auto insurance
cheap car insurance in alabama: autoinsurance2019.us.com/
KimBus
sertraline zoloft: genericzoloft.com/
cure auto insurance
car insurance companies: carinsurance2019.us.org/ top rated auto insurance: autoinsurance2019.us.com/
NickBus
buy propranolol for anxiety: propranolol40.com/ buy diflucan yeast infection: diflucan150.com/ buy lipitor online: lipitoratorvastatin.com/ sertraline zoloft: genericzoloft.com/ strattera: stratteraatomoxetine.com/
auto owners ins
auto insurance: autoinsurance2019.us.com/ car insurance: carinsurance2019.us.org/
low car insurance
car insurance: carinsurance2019.us.org/ buy auto insurance online: autoinsurance2019.us.com/
best auto insurance
car insurance: carinsurance2019.us.org/ direct auto insurance: autoinsurance2019.us.com/
IvyBus
generic for zoloft: genericzoloft.com/ generic for lipitor: lipitoratorvastatin.com/ diflucan oral: diflucan150.com/ propranolol: propranolol40.com/ buy strattera: stratteraatomoxetine.com/
DenBus
propranolol 40mg: propranolol40.com/ zoloft generic: genericzoloft.com/ strattera: stratteraatomoxetine.com/ diflucan 150: diflucan150.com/ lipitor: lipitoratorvastatin.com/
KiaBus
where to buy propranolol: propranolol40.com/
go auto insurance
auto insurance: autoinsurance2019.us.com/ car insurance quotes: carinsurance2019.us.org/
aaa auto insurance
car insurance: carinsurance2019.us.org/ quotes auto insurance: autoinsurance2019.us.com/
JaneBus
how much is strattera: stratteraatomoxetine.com/
SamBus
strattera: stratteraatomoxetine.com/ zoloft medicine: genericzoloft.com/ propranolol: propranolol40.com/ diflucan online without prescription: diflucan150.com/ generic lipitor cost: lipitoratorvastatin.com/
EyeBus
buy diflucan 150mg: diflucan150.com/ lipitor atorvastatin: lipitoratorvastatin.com/ propranolol beta blocker: propranolol40.com/ strattera generic: stratteraatomoxetine.com/ zoloft: genericzoloft.com/
cure auto insurance
car insurance quotes comparison: carinsurance2019.us.org/
nationwide insurance
online auto insurance: autoinsurance2019.us.com/ cheap car insurance quotes: carinsurance2019.us.org/
usaa auto insurance
compare car insurance quotes: carinsurance2019.us.org/ auto insurance quotes comparison: autoinsurance2019.us.com/
JimBus
SamBus
diflucan: diflucan150.com/ buy lipitor cheap: lipitoratorvastatin.com/ generic strattera: stratteraatomoxetine.com/ propranolol tablets: propranolol40.com/ zoloft sertraline: genericzoloft.com/
JoeBus
cipro: ciprofloxacin500.com/ doxycycline 100 mg: doxycycline100.com/ diflucan: diflucan150.com/ albendazole tablets: albendazoletablets.com/ fluoxetine 10 mg: fluoxetine20.com/
AnnaBus
lipitor buy: lipitoratorvastatin.com/ buy diflucan online: diflucan150.com/ propranolol online pharmacy: propranolol40.com/ zoloft: genericzoloft.com/ how much is strattera: stratteraatomoxetine.com/
ManBus
cheap essay writing service: essaywritingservice2018.com/ bad credit loans guaranteed approval: badcreditloansguaranteedapproval2018.com/ do my homework for me: domyhomework2018.com/
EvaBus
JasonBus
diflucan online: diflucan150.com/ straterra: stratteraatomoxetine.com/ propranolol online: propranolol40.com/ zoloft: genericzoloft.com/ lipitor: lipitoratorvastatin.com/
SueBus
buy diflucan online: diflucan150.com/ buy zoloft without prescription: genericzoloft.com/ propranolol: propranolol40.com/ generic atomoxetine: stratteraatomoxetine.com/ lipitor: lipitoratorvastatin.com/
car insurance quotes
car insurance quote: carinsurance2019.us.org/ direct auto insurance: autoinsurance2019.us.com/
ManBus
writing service: essaywritingservice2018.com/ auto loan: autoloan2018.com/ loans direct: loans1000.com/ poor credit loans: creditloansguaranteedapproval.com/ writing titles in an essay: writemyessay2018.com/
NickBus
propranolol drug: propranolol40.com/ generic atomoxetine: stratteraatomoxetine.com/ buy lipitor: lipitoratorvastatin.com/ zoloft: genericzoloft.com/ buy diflucan 150mg: diflucan150.com/
nj auto insurance
auto insurance: autoinsurance2019.us.com/ buy car insurance: carinsurance2019.us.org/
KimBus
price of strattera: stratteraatomoxetine.com/
JimBus
zoloft: genericzoloft.com/ buy lipitor: lipitoratorvastatin.com/ propranolol: propranolol40.com/ generic atomoxetine: stratteraatomoxetine.com/ buy diflucan online: diflucan150.com/
SueBus
propranolol 10mg: propranolol40.com/ no prescription zoloft: genericzoloft.com/ straterra: stratteraatomoxetine.com/ fluconazole buy online without prescription: diflucan150.com/ lipitor atorvastatin: lipitoratorvastatin.com/
JoeBus
tadalafil: tadalafil20mg.com/ acyclovir 400mg: acyclovir400.com/ hydrochlorothia zide: lisinoprilhydrochlorothiazide.com/ zithromax buy: buyzithromaxonline.com/ sildenafil: sildenafilx.com/
AnnaBus
zoloft sertraline: genericzoloft.com/ buy propranolol: propranolol40.com/ diflucan medicine: diflucan150.com/ lipitor: lipitoratorvastatin.com/ atomoxetine strattera: stratteraatomoxetine.com/
EvaBus
aig auto insurance
car insurance quote: carinsurance2019.us.org/
JasonBus
buy diflucan: diflucan150.com/ strattera: stratteraatomoxetine.com/ zoloft generic: genericzoloft.com/ lipitor: lipitoratorvastatin.com/ ordering propanalol: propranolol40.com/
insurance quote
top car insurance: autoinsurance2019.us.com/ car insurance: carinsurance2019.us.org/
AnnaBus
propranolol 40mg: propranolol40.com/ generic strattera: stratteraatomoxetine.com/ diflucan 150 mg tablets: diflucan150.com/ lipitor: lipitoratorvastatin.com/ zoloft ocd: genericzoloft.com/
KimBus
generic atomoxetine: stratteraatomoxetine.com/
best insurance rates
online car insurance quotes: carinsurance2019.us.org/ auto insurance: autoinsurance2019.us.com/
DenBus
buy strattera without prescription: stratteraatomoxetine.com/ diflucan 150 mg: diflucan150.com/ generic lipitor: lipitoratorvastatin.com/ propranolol online: propranolol40.com/ zoloft: genericzoloft.com/
EyeBus
zoloft generic: genericzoloft.com/ generic propranolol: propranolol40.com/ diflucan over counter: diflucan150.com/ cost of lipitor: lipitoratorvastatin.com/ strattera: stratteraatomoxetine.com/
amica car insurance
cheap car insurance quotes online: carinsurance2019.us.org/ best auto insurance rates: autoinsurance2019.us.com/
esurance
auto owner insurance: autoinsurance2019.us.com/
MiaBus
MiaBus
buy strattera without prescription: stratteraatomoxetine.com/ diflucan over counter: diflucan150.com/ propranolol: propranolol40.com/ generic lipitor: lipitoratorvastatin.com/ zoloft without prescription: genericzoloft.com/
JackBus
wellbutrin generic price: wellbutrin150.com/ chewable viagra soft tabs: buyviagrasoft.com/ order avodart: buyavodart.com/ acyclovir 400mg tablets: acyclovir400.com/ stromectol buy: buystromectolonline.com/
cheap auto insurance
quotes auto insurance: autoinsurance2019.us.com/ car insurance quote: carinsurance2019.us.org/
SamBus
zoloft sertraline: genericzoloft.com/ propranolol: propranolol40.com/ diflucan: diflucan150.com/ liptor: lipitoratorvastatin.com/ how much is strattera: stratteraatomoxetine.com/
NickBus
sertraline: genericzoloft.com/ diflucan: diflucan150.com/ lipitor: lipitoratorvastatin.com/ price of strattera: stratteraatomoxetine.com/ propranolol pill: propranolol40.com/
auto club insurance
auto insurance quote: autoinsurance2019.us.com/
direct car insurance
auto insurance rates: autoinsurance2019.us.com/ car insurance: carinsurance2019.us.org/
allstate insurance
car insurance quotes online: carinsurance2019.us.org/ auto insurance: autoinsurance2019.us.com/
ManBus
vehicle loan rates: autoloan72months.com/ writing service: writingservice2018.com/ credit loans: creditloansguaranteedapproval.com/ cheap essay writing service: essaywritingservice2018.com/
JackBus
amoxicillin 500 mg capsules: amoxicillin8.com/ furosemide 20 mg: furosemide20.com/ elimite cream price: elimite5.com/ order metformin online: metformin500.com/ cephalexin: cephalexin500.com/
geico auto insurance
auto insurance cost: autoinsurance2019.us.com/ compare car insurance quotes: carinsurance2019.us.org/
EyeBus
lipitor.com: lipitoratorvastatin.com/ propranolol hydrochloride: propranolol40.com/ sertraline: genericzoloft.com/ strattera atomoxetine: stratteraatomoxetine.com/ diflucan buy without prescription: diflucan150.com/
MiaBus
lipitor: lipitoratorvastatin.com/ generic zoloft: genericzoloft.com/ diflucan no prescription: diflucan150.com/ propranolol buy: propranolol40.com/ buy strattera: stratteraatomoxetine.com/
JoeBus
metformin 500 mg tablets: metformin500.com/ furosemide 40 mg: furosemide20.com/ antabuse: antabuse250.com/ drug cephalexin: cephalexin500.com/ albendazole 400 mg: albendazoletablets.com/
JaneBus
generic zoloft: genericzoloft.com/
car insurance quote
auto insurance: autoinsurance2019.us.com/
KiaBus
cure auto insurance
car insurance rates: carinsurance2019.us.org/ auto insurance comparison: autoinsurance2019.us.com/
autoinsurance
free webcam sex: webcamsex.us.com college essays: collegeessays.us.com
allstate
car insurance: carinsurance2019.us.org/ direct auto insurance: autoinsurance2019.us.com/
amica auto insurance
auto insurance: autoinsurance2019.us.com/ car insurance quote: carinsurance2019.us.org/
best insurance
car insurance quotes online: carinsurance2019.us.org/ auto insurance quotes comparison: autoinsurance2019.us.com/
MiaBus
diflucan: diflucan150.com/ buy propranolol online: propranolol40.com/ strattera online: stratteraatomoxetine.com/ lipitor generic: lipitoratorvastatin.com/ sertraline zoloft: genericzoloft.com/
auto insurance
auto insurance quotes comparison: autoinsurance2019.us.com/ car insurance: carinsurance2019.us.org/
JaneBus
propranolol: propranolol40.com/
best insurance
car insurance: carinsurance2019.us.org/ auto insurance online: autoinsurance2019.us.com/
JackBus
clomid 50: clomidforwomen.com/ lipitor atorvastatin: lipitoratorvastatin.com/ ventolin 90 mcg: ventolin90mcg.com/ levitra 20mg: levitra911.com/ antabuse: antabuse250.com/
JimBus
diflucan without a prescription: diflucan150.com/ strattera generic: stratteraatomoxetine.com/ buy lipitor: lipitoratorvastatin.com/ zoloft generic: genericzoloft.com/ propranolol: propranolol40.com/
DenBus
generic for zoloft: genericzoloft.com/ strattera: stratteraatomoxetine.com/ diflucan: diflucan150.com/ buy propranolol online: propranolol40.com/ lipitor generic price: lipitoratorvastatin.com/
JasonBus
zoloft generic: genericzoloft.com/ diflucan 150: diflucan150.com/ propranolol drug: propranolol40.com/ strattera cost: stratteraatomoxetine.com/ lipitor: lipitoratorvastatin.com/
erie auto insurance
online car insurance: carinsurance2019.us.org/ auto insurance quote online: autoinsurance2019.us.com/
KiaBus
propranolol 40: propranolol40.com/
KiaBus
propranolol buy: propranolol40.com/
SamBus
generic zoloft: genericzoloft.com/ buy propranolol online: propranolol40.com/ 150 mg diflucan online: diflucan150.com/ generic for strattera: stratteraatomoxetine.com/ lipitor: lipitoratorvastatin.com/
SamBus
buy strattera: stratteraatomoxetine.com/ zoloft sertraline: genericzoloft.com/ buy online diflucan: diflucan150.com/ propranolol: propranolol40.com/ lipitor: lipitoratorvastatin.com/
ManBus
payday loan com: paydayloans2018.com/ payday loans online no credit check: onlinepaydayloans2018.com/ auto owners insurance company: autoownersinsuranceonline.com/ online payday: installmentloans2018.com/
IvyBus
propranolol: propranolol40.com/ strattera cost: stratteraatomoxetine.com/ lipitor: lipitoratorvastatin.com/ zoloft generic: genericzoloft.com/ buy diflucan 150mg: diflucan150.com/
automobile insurance
papers: papers.us.com cheap car insurance: cheapcarinsurance.us.org
JasonBus
strattera generic: stratteraatomoxetine.com/ propranolol cost: propranolol40.com/ sertraline: genericzoloft.com/ diflucan: diflucan150.com/ atorvastatin: lipitoratorvastatin.com/
ManBus
consolidation loans for bad credit: loansforbadcredit2018.com/ online loan companies: badcreditloansguaranteedapproval2018.com/ quick cash loans no credit check: cashadvance911.com/
SueBus
zoloft generic: genericzoloft.com/ strattera: stratteraatomoxetine.com/ propranolol online: propranolol40.com/ diflucan: diflucan150.com/ lipitor 20mg: lipitoratorvastatin.com/
ManBus
bad credit loans: creditloansguaranteedapproval.com/ poor credit loans guaranteed approval: creditloansguaranteedapproval2018.com/ car interest rates 2019: carloans2019.com/ guaranteed loan: loansguaranteedapproval.com/ loans online instant: loansforbadcredit2018.com/
EyeBus
propranolol 40mg: propranolol40.com/ strattera atomoxetine: stratteraatomoxetine.com/ buy diflucan online: diflucan150.com/ lipitor generic: lipitoratorvastatin.com/ zoloft sertraline: genericzoloft.com/
JoeBus
cafergot pills: cafergotmedication.com/ zithromax: buyzithromaxonline.com/ buy xenical: xenicalcapsules.com/ buy prednisone: prednisone2.com/ sildenafil: sildenafilx.com/
affordable insurance
auto insurance quotes online: autoinsurance2019.us.com/ titan insurance company: carinsurance2019.us.org/
NickBus
diflucan: diflucan150.com/ strattera: stratteraatomoxetine.com/ purchase lipitor: lipitoratorvastatin.com/ propranolol: propranolol40.com/ buy zoloft online: genericzoloft.com/
SueBus
lipator: lipitoratorvastatin.com/ generic strattera: stratteraatomoxetine.com/ diflucan 150 mg tablets: diflucan150.com/ where to buy propranolol: propranolol40.com/ sertraline: genericzoloft.com/
DenBus
propranolol 40: propranolol40.com/ buy lipitor online: lipitoratorvastatin.com/ zoloft without prescription: genericzoloft.com/ atomoxetine: stratteraatomoxetine.com/ 150 mg diflucan online: diflucan150.com/
JackBus
amoxicillin: amoxicillin8.com/ cephalexin 500 mg: cephalexin500.com/ generic propecia 5mg: propecia5.com/ elimite online: elimite5.com/ cost of trazodone: trazodone50.com/
EvaBus
KiaBus
generic for lipitor: lipitoratorvastatin.com/
JackBus
buy indomethacin: indocinindomethacin.com/ valtrex: valtrex500.com/ vardenafil: vardenafil20.com/ allopurinol 100mg tablets: allopurinol100.com/ propranolol buy: propranolol40.com/
EyeBus
diflucan 150mg: diflucan150.com/ propranolol: propranolol40.com/ lipitor atorvastatin: lipitoratorvastatin.com/ buy strattera without prescription: stratteraatomoxetine.com/ zoloft sertraline: genericzoloft.com/

Добавить комментарий

Защитный код
Обновить