1.
(*program pozdravi*)
program pozdrav;
begin
writeln ('ahoj');readln;
end.
2.
(*scitac*)
program soucet;
var a,b,c:integer;
begin read(a,b);
c:=a+b;
writeln(c);
readln
3.
(*obvod a obsah ctverce*)
program obvod;
var a,y,o:integer;
begin write('zadej strany ctverce');
readln(a);
y:=(4*a);
o:=(a*a);
writeln('obsah ctverce je',y);
writeln('obvod ctverce je',o);
writeln('to koukas co');
readln;
end.
4.
(*obvod a obsah obdelnika*)
program obvod;
var a,b,y,o:integer;
begin writeln('zadej strany obdelnika');
writeln('stranu a');
readln(a);
writeln('stranu b');
readln(b);
y:=(2*(a*b));
o:=(a*b);
writeln('obsah obdelnika je',o);
writeln('obvod obdelnika je',y);
writeln('to koukas co');
readln;
end.
5.
(*obvod a obsah kruhu*)
program kruh;
var r:integer;
o,s:real;
begin writeln('zadej polomer r');
readln(r);
o:=2*3.14*r;
s:=3.14*r*r;
writeln('obvod je',o:8:3);
writeln('obsah je',s:8:3);
writeln('nezdrzuj, priste si vem kalkulacku');
readln
end.
6.
(*obvod a obsah pravouhleho trojuhelnika*)
program trojuhelnik;
var a,b,c:real;
o,s:real;
begin writeln('napis stranu a');
readln(a);
writeln('napis stranu b');
readln(b);
c:=sqrt(a*a+b*b);
o:=(a+b+c);
s:=(a*b)/2;
writeln('strana c je');
writeln(c:8:3);
writeln('obvod je');
writeln(o:8:3);
writeln('a obsah je');
writeln(s:8:3);
writeln('diky za pocitani, pro ukonceni stisknete ENTER');
readln;
end.
7.
(*prevod*)
program prevadec;
var a,b,c:real;
begin writeln('napis cislo');
readln(a);
writeln('pro prevod na milimetry stiskni 1');
writeln('pro prevod na decimetry stiskni 2');
writeln('pro prevod na kilometry stiskni 3');
readln(b);
if b=1 then c:=(a*1000);
if b=2 then c:=(a*100);
if b=3 then c:=(a/1000);
writeln(c:8:3);
readln;
end.
8.
(*vypise sousedy znaku*)
program vypisovac;
var z,p,n:char;
begin writeln('napis znak');
readln(z);
p:=pred(z);
n:=succ(z);
writeln('predchudce je');
writeln(p);
writeln('nasledovnik je');
writeln(n);
readln;
end.
9.
(*pocet kraliku a slepic*)
program pocitac;
var a,b,c,d:integer;
begin writeln('napis pocet kraliku');
readln(a);
writeln('napis pocet slepic');
readln(b);
c:=(a*4+b*2);
d:=(a+b);
writeln('pocet hlav je');
writeln(d);
writeln('pocet nohou je');
writeln(c);
readln;
end.
10.
(*celociselny podil a zbytek*)
program podil;
uses crt;
var a,b,c,d:integer;
begin clrscr;
writeln('zadej 2 cisla');
readln(a);
readln(b);
c:=a div b;
textcolor(yellow);
writeln('vysledek je', c);
d:=a mod 2;
textcolor(red);
writeln('zbytek je', d);
readln;
end.
11.
(*prekoduje znak o dany pocet pozic*)
program prekodovac;
uses crt;
var vs,vy,q,w:char;
a,b:integer;
begin clrscr;
readln(vs,a);
b:=ord (vs);
b:=b+a;
vy:=chr(b);
writeln(vy);
writeln('zmackni q pro ukonceni');
repeat
if keypressed then readln(w);
until w='q';
end.
12.
(*vytiskni vetsi ze 2 cisel*)
program vetsi;
uses crt;
var w:char;
a,b,c:real;
begin clrscr;
writeln('napis cislo a');
readln(a);
writeln('napis cislo b');
readln(b);
if a<b then writeln('a je mensi jak b');
if a>b then writeln('a je vetsi jak b');
if a=b then writeln('nezkousej to na me, jsou stejny');
textcolor(red);
writeln('napis q pro ukonceni');
repeat
if keypressed then readln(w);
until w='q';
end.
13.
(*vytiskni vetsi ze 2 cisel*)
program vetsi;
uses crt;
var w:char;
a,b,c:real;
begin clrscr;
writeln('napis cislo a');
readln(a);
if a<0 then writeln('cislo je zaporne');
if a>0 then writeln('cislo je kladne');
if a=0 then writeln('neni kladne, ani zaporne');
textcolor(red);
writeln('napis q pro ukonceni');
repeat
if keypressed then readln(w);
until w='q';
end.
14.
(*vytiskni vetsi ze 2 cisel*)
program vetsi;
uses crt;
var w:char;
a,b,c:real;
begin clrscr;
writeln('napis cislo a');
readln(a);
if a<0 then writeln('cislo je zaporne');
if a>0 then writeln('cislo je kladne');
if a=0 then writeln('neni kladne, ani zaporne');
textcolor(red);
writeln('napis q pro ukonceni');
repeat
if keypressed then readln(w);
until w='q';
end.
15.
(*rozhodnete kolikaciferne cislo je*)
program cifry;
uses crt;
var a:integer;
begin clrscr;
writeln('napis cislo');
readln(a);
if a<10 then writeln('jednociferne')
else if a>99 then writeln('viceciferne');
readln;
end.
16.
(*vetsi cislo*)
program cislo;
uses crt;
var x:char;
a,b,c:integer;
begin clrscr;
writeln('zadej cislo');
readln(a);
writeln('zadej druhe cislo');
readln(b);
if a>b then writeln(a:5,b:5);
if a<b then writeln(b:5,a:5);
if a=b then writeln('jsou stejny');
textcolor(4);
writeln('pro ukonceni zmackni q');
repeat
if keypressed then readln(x);
until x='q';
end.
17.
18.
(*pozdrav podle hodin*)
program hodiny;
uses crt;
var a,b,c:integer;
begin clrscr;
writeln('napiste kolik je hodin, bez minut');
readln(a);
if a<12 then writeln('dobre dopoledne')
else if a<=18 then writeln('dobre odpoledne')
else if a<=24 then writeln('dobry vecer')
else writeln('neblbni');
readln;
end.
19. (*program ktery rozhodne typ znaku*)
program znaky;
uses crt;
var a: char;
begin clrscr;
writeln ('zadej znak');
readln (a);
if (a>'A') and (a<='Z') then writeln ('velke pismenu')
else if (a>='a')and(a<='z') then write ('male pismeno')
else if (a>='0') and (a<='9') then write('cislo')
else write ('jiny znak');
readln;
end.
kalkulacka
(*kalkulacka*)
program pocitani;
uses crt;
var cis1,cis2,vys:integer;
ope:char;
begin clrscr;
writeln ('zadej cislo 1:');
readln (cis1);
writeln ('zadej operator:');
readln (ope);
writeln ('zadej cislo 2:');
readln (cis2);
if(ope='+') then vys:=cis1+cis2;
if(ope='-') then vys:=cis1-cis2;
if(ope='*') then vys:=cis1*cis2;
if(ope='/') then vys:=cis1 div cis2;
writeln ('vyjde nam ', vys);
readln;
end.
Pekař
(*pekar*)
program delta;
uses crt;
var a,b,c,d: real;
begin clrscr;
writeln ('ze vikend ma');
readln (a);
c:=(a/100)*15;
b:=(a-c)-1000;
writeln ('za mesic zbyde ',b:8:3);
d:=b*52;
writeln ('za rok ma ',d:8:3);
if d<15000
then writeln ('nekoupi si auto');
if d>15000
then writeln ('muze si koupit auto za 15000Kc');
if d>25000
then writeln ('muze si kopuit auto za 25000Kc');
readln;
end.
(*opakovaniapodminka*)
program vypisovac;
uses crt;
var n,i: integer;
begin clrscr;
writeln ('zadej cislo');
readln (n);
i:=0;
repeat i:=i+1;
writeln (i)
until i=n;
readln;
end.
Vypisovac
(*opakovaniapodminka*)
program vypisovac;
uses crt;
var n,i: integer;
begin clrscr;
writeln ('zadej cislo');
readln (n);
i:=0;
repeat i:=i+1;
writeln (i)
until i=n;
readln;
end.
(*rozhoduje co je znak*) program rozhodovac; uses crt; var a,b:char; begin clrscr; writeln('klikni na libovolnou klavesnici'); repeat readln(a); case a of '0'..'9':writeln('cislo'); 'a'..'z':writeln('male pismeno'); 'A'..'Z':writeln('velke pismeno'); else writeln('jiny znak'); end; until a=';'; end.
(*zaradi datum*) program zarazovac; uses crt; var a,b:integer; begin clrscr; writeln('napiste datum (den)'); readln(a); writeln('napiste mesic (cislem)'); readln(b); case b of 1..3:writeln('1 ctvrtleti'); 4..6:writeln('2 ctvrtleti'); 7..9:writeln('3 ctvrtleti'); 10..12:writeln('4 ctvrtleti'); else writeln('nevymyslej blbosti'); end; readln; end.
(*bmi index*) program bmi; uses crt; var a,b,c,d:integer; e,f:real; x:char; begin clrscr; repeat writeln('zadej svou vahu (kg)'); readln(a); writeln('zadej svou vysku (m)'); readln(f); e:=a/(f*f); writeln('tvuj idex je ',e:8:3); case round(e) of 0..20:writeln('podvaha'); 21..25:writeln('normal'); 26..100:writeln('nadvaha'); end; writeln('pro ukonceni zmackni ; nebo pokracuj ENTER'); x:=readkey; until x=';' end.
(*rodne cislo*) program rodne; uses crt,dos; var r,m,d,a:integer; rok,mesic,den,dent:word; x:char; begin clrscr; repeat GetDate(rok,mesic,den,dent); writeln('napis prvni 2 cisla z rodneho cisla'); readln(r); writeln('napis druhe 2 cisla z rodneho cisla'); readln(m); writeln('napis treti 2 cisla z rodneho cisla'); readln(d); case m of 1..12:writeln('muz'); 13..62:writeln('zena'); end; if m>13 then m:=m-50; writeln('narodil si se ', d); case m of 1:writeln('leden'); 2:writeln('unor'); 3:writeln('brezen'); 4:writeln('duben'); 5:writeln('kveten'); 6:writeln('cerven'); 7:writeln('cervenec'); 8:writeln('srpen'); 9:writeln('zari'); 10:writeln('rijen'); 11:writeln('listopad'); 12:writeln('prosinec'); end; writeln('v roce 19',r); if r<88 then writeln('jsi plnolety') else writeln('nejsi plnolety'); if (den=d)and(mesic=m) then writeln('happy birthday'); writeln('pro pokracovani stiskni ENTER, pro konec ;'); x:=readkey; until x=';'; end.
(*rodne cislo*) program rodne; uses crt,dos; var r,m,d,a:integer; rok,mesic,den,dent:word; x:char; begin clrscr; repeat GetDate(rok,mesic,den,dent); writeln('napis prvni 2 cisla z rodneho cisla'); readln(r); writeln('napis druhe 2 cisla z rodneho cisla'); readln(m); writeln('napis treti 2 cisla z rodneho cisla'); readln(d); case m of 1..12:writeln('muz'); 13..62:writeln('zena'); end; if m>13 then m:=m-50; writeln('narodil si se ', d); case m of 1:writeln('leden'); 2:writeln('unor'); 3:writeln('brezen'); 4:writeln('duben'); 5:writeln('kveten'); 6:writeln('cerven'); 7:writeln('cervenec'); 8:writeln('srpen'); 9:writeln('zari'); 10:writeln('rijen'); 11:writeln('listopad'); 12:writeln('prosinec'); end; writeln('v roce 19',r); if r<88 then writeln('jsi plnolety') else writeln('nejsi plnolety'); if (den=d)and(mesic=m) then writeln('happy birthday'); case m of 1:if d<=21 then writeln('si vodnar') else writeln('si ryba'); 2:if d<=21 then writeln('si ryba') else writeln('si beran'); 3:if d<=21 then writeln('si beran') else writeln('si byk'); 4:if d<=21 then writeln('si byk') else writeln('si blizenec'); end; writeln('pro pokracovani stiskni ENTER, pro konec ;'); x:=readkey; until x=';'; end.
(*geometricke tvary*) program geometrie; uses crt; var a,b,c:integer; o,s,f:real; x:char; begin clrscr; repeat writeln('pro vypocet kruhu zmackni 1, pro ctverec 2, pro obdelnik 3'); readln(c); case c of 1:begin writeln('zadej polomer'); readln(a); o:=(2*3.14)*a; s:=3.14*(a*a); end; 2:begin writeln('zadej stranu a'); readln(a); o:=4*a; s:=a*a; end; 3:begin writeln('zadej stranu a'); readln(a); writeln('zadej stranu b'); readln(b); o:=2*(a+b); s:=a*b; end; end; writeln('obvod je ', o:8:3); writeln('obsah je ', s:8:3); writeln('pro pokracovani stiskni ENTER, pro konec ;'); x:=readkey; until x=';'; end.
(*priklad 27*) program dvacetsedm; uses crt; var n,i:integer; begin clrscr; readln(n); i:=0; while i<n do begin i:=i+1; writeln(i); end; readln; end.
(*priklad 27 tretim cyklem*) program dvacetsedm; uses crt; var n,i:integer; begin clrscr; readln(n); for i:=1 to n do writeln(i); readln; end.
(*cykly*) program cykly; uses crt; var n,i,a:integer; begin clrscr; writeln('napis libovolne cislo'); readln(n); i:=0; a:=0; repeat i:=i+1; if i=n then write(i) else write(i,'+'); a:=a+i; until i=n; writeln('=',a); readln; end.
(*vytiskni prvni n livhych cisel*) program vytiskovac; uses crt; var n,i:integer; a,x:char; begin clrscr; writeln('napis libovolne cislo'); readln(n); i:=1; repeat i:=i+2; writeln(i); until i>n; readln; end.
(*kladne cislo*) program kladnecislo; uses crt; var i,n,p:integer; o:real; begin clrscr; randomize; textcolor(random(15+1)); repeat writeln('napis cislo'); readln(n); p:=p+1; if n<=0 then writeln('ses nula zadej kladne cislo'); until n>0; writeln('pocet je pokusu', p); o:=sqrt(n); writeln('odmocnina je',o:8:3); readln; end.
(*deset nasobku cisla*) program nasobky; uses crt; var i,n:integer; begin clrscr; writeln('napis cislo'); readln(n); for i:=1 to 10 do write(i,'*',n,'=',i*n,' '); readln; end.
(*nevim*) program nevim; uses crt; var a:integer; begin clrscr; randomize; a:=0; repeat textcolor(random(15+1)); writeln('AHOJ'); a:=a+1; until a=16; readln; end.
(*udela neaky moznosti bez operatoru*) program bezoperatoru; uses crt; var a,b,c,i:integer; begin clrscr; writeln('zadej cislo a'); readln(a); writeln('zadej cislo b'); readln(b); c:=0; i:=0; repeat c:=a+c; i:=i+1; if i=b then write(a) else write(a,'+'); until i=b; writeln('=',c); readln; end.
(*33ka*) program prg; uses crt; var a,b,n,pocet,i:integer; begin clrscr; readln(n); pocet:=0; for i:=1 to n do begin if (n mod i)=0 then begin write(i:4); pocet:=pocet+1; end; end; textcolor(2); writeln(' pocet delitelu je', pocet); readln; end.
(*34 novym zpusobem*) program upgrade34; uses crt; var i,n:integer; begin clrscr; readln(n); for i:=1 to n do writeln(i); readln; end.
(*33ka*) program prg; uses crt; var a,b,n,pocet,i:integer; begin clrscr; readln(n); pocet:=0; for i:=1 to n do begin if (n mod i)=0 then begin write(i:4); pocet:=pocet+1; end; end; textcolor(2); writeln(' pocet delitelu je', pocet); textcolor(9); if pocet<=2 then writeln('prvocislo'); readln; end.
dalsi ulohy:
(*napsat prvnich deset nesobku cosla7*)
var c:integer;
begin c:=0;
repeat c:=c+7;
writeln (c);
until c=70;
readln;
end.
(*38 je dano n cisel,vytisknete primer n=3: 1,2,3 prumer soucet/pocet 6/3=2.maximu, je 3*)
program cisla;
var n, cislo, soucet, i:integer; prumer: real;
begin readln(n);soucet:=0;
for i:=1 to n do
begin readln (cislo);
soucet:=soucet+cislo
end;
prumer:=soucet/n;
writeln ('prumer je:', prumer:0:2);
readln
end.
(*36 je dano n cisel,vytisknete primer n=3: 1,2,3 prumer soucet/pocet 6/3=2.maximu, je 3*)
program cisla;
var n, cislo, max, i:integer; prumer: real;
begin readln(n);max:=0;
for i:=1 to n do
45begin readln (cislo);
if cislo>max then max:=cislo
end;
writeln ('max je:', max);
readln
end.
(*48*)
program uloha48;
uses crt,dos;
var h,m,s,ss:word;
begin
repeat clrscr;
delay(1000);
gettime (h,m,s,ss);
writeln (h,':',m,':',s);
until keypressed;
end.
(*10cisel (10-50)*)
program nasobky;
uses crt;
var c,i:integer;
begin clrscr;
randomize;
for i:=1 to 10 do
begin c:=random(41)+10 ;
writeln(c);
if (c mod 2)=0 then writeln('sude') else
end;
readkey;
end.
(*48*)
program uloha48;
uses crt,dos;
var h,m,s,ss:word;
begin
repeat clrscr;
delay(1000);
gettime (h,m,s,ss);
writeln (h,':',m,':',s);
until keypressed;
end.
(*vytisknete prvnich 10 nasobku cisla n a soucet techto nasobku*)
program nasobky;
uses crt;
var n,i,s:integer;
begin clrscr;
writeln ('zadejte cislo');
readln(n);
for i:=1 to 10 do
begin
writeln(i*n); s:=s+i*n;
end;
writeln ('soucet je',s);
readln;
end.
(*odecitani od 100 n*)
program odecitani;
uses crt;
var n,p:integer;
begin clrscr;
p:=100;
repeat writeln (p);
p:=p-n;
until p<=0;
readkey;
end.
program pade;
uses crt;
var a:integer;
ch: char;
begin
repeat
writeln ('stiskni nekterou klavesu');
ch:=readkey;
case ch of
'a'..'z':writeln ('male pismeno');
'0'..'9':writeln ('cislice');
'A'..'Z':writeln ('velke pismeno');
#27:writeln('ESC');
#13:writeln('ENTER');
#0:begin ch:=readkey;
if ch = #72 then writeln ('sipka nahoru');
if ch = #80 then writeln ('sipka dolu');
if ch = #77 then writeln ('sipka doprava');
if ch = #75 then writeln ('sipka doleva');
end;
end;
until ch=#27;
end.
(*50*)
program pade;
uses crt;
var a: integer;
ch: char;
begin clrscr;
repeat
ch:=readkey;
textcolor(10);
writeln('program ukoncis kl.zkratkou');
textcolor(8);
writeln(ord(ch));
until ord(ch)=1;
end.
(*53 malovani*)
program malovani;
uses crt;
var x,y:integer;
ch:char;
begin textbackground(9); clrscr; x:=40; y:=25;
repeat gotoxy(x,y);
textcolor(10);
textbackground(1);
writeln('*');
ch:=readkey;
if ch=#0 then ch:=readkey;
case ch of
#72:y:=y-1;
#80:y:=y+1;
#77:x:=x+1;
#75:x:=x-1;
end;
until ch=#27
end.
Komentáře
Přehled komentářů
Классическая яичная диета Магги основана на употреблении значительного количества яиц в с утра до ночи, которые выступают главным источником белка. Оный продукт является кладезем важных аминокислот как и микроэлементов.
https://www.youtube.com/watch?v=9yV1S5SdHSo
В сети в большом количестве представлены фото раньше и после похудения, которые наглядно показывают в какой степени ушли объемы.
Введите Ваш телефон в свой черед имя Наш менеджер свяжется с Вами в ближайшее урочный час, чтобы ответить на все Ваши вопросы.
https://www.youtube.com/watch?v=D-KGCHexxUc
однако главное, чтобы такой «сбой» не затянулся. Челлендж «Здоровый сон» – это прекрасная средство бросить себе вызов также посмотреть, сможете ли вы изменить свой режим, а заодно проверить, как сильно исключительно одна новая привычка надеюсь воздействовать на ваше самочувствие. А мы все эти три недели будем рассказывать вам о хитростях, которые помогут вам перестроиться безболезненно.
Прежде заместо начать выполнять фикс диетической программы, попробуйте задержать взгляд на себе со стороны. надо надеяться быть лишний вес – это ваша чисто психологическая вопрос? Есть ли он на самом деле? Ни одна диета не сможет справиться с вашими мечтами, если альтернатива надумана.
https://www.youtube.com/watch?v=3283gq5gIPA
После выполнения данной процедуры кисломолочный продукт готов к употреблению.
Вырабатываемая привычка к частым, но не большим порциям еды. Благодаря диете происходит привыкание к малым объемам как и стенки желудка сжимаются.
https://www.youtube.com/watch?v=0XV7qbysEq0
Четвертая неделя диеты Магги – «оценивание результатов»
Такой паштет подходит при заболеваниях язвой, гастритом, при панкреатите.
https://www.youtube.com/watch?v=iVLvsttMgqw
В первую неделю организм закругляйся привыкать к новому режиму питания. склифосовский очень сложно , именно, если на диету вы сели впервые, но следует заставить себе сохранять.
С удовольствием подберем под Вас подходящую эффективную программу
https://www.youtube.com/watch?v=INWeRUJPSzg
Регулярное исчерпание яиц препятствует развитию анемии, малокровия, повышает иммунитет, улучшает память, стимулирует работу мозга вдобавок усиливает увлеченность.
Частая дефекация кишечника – это естественная реакция на «перенасыщение» организма белковыми продуктами, дефицит жиров как и углеводов, а также смену рациона питания.
Рассмотрим наиболее распространенные блюда, приготовленные из разрешенных продуктов, которые позволят разнообразить меню как и не только облегчить быстрина похудения, но равным образом подарят истинное музицирование из-за приема низкокалорийной полезной пищи.
Beautiful blank printable calendar
(Nilmes, 29. 10. 2022 19:56)
A schedule can be a advantageous tool for keeping smell of the time. Single can make use of calendars to keep wake trace of momentous dates and events in only’s life.
When printed, calendars are restful to transmit around. They can be tempered to as a handy reminder of upcoming events, such as birthdays, graduations, weddings, or holidays. This can help a личность plot onwards and evade making last-minute plans.
New https://t.me/s/printable_calendar - printable calendar is a nice and easy to smoke weapon in order to regard track of your events. It is a superior in to your organization. The printable almanac has the adjustableness to set all the events that are consequential to you in one place. Provoke your individual calendar online with the advise of the printable calendar.
gеt nоw # bіg bonus
(Petaronect, 27. 10. 2022 10:18)
Best onlіnе саsіno
Bіg bоnus аnd Frееsріns
Spоrt bеttіng аnd pоkеr
go now https://tinyurl.com/bdfepc27
What talented idea
(Dwaincoips, 24. 10. 2022 23:23)
It is very valuable information
https://charlesnewmandesigner.com
https://mybnet.org
risky petty
(Lamonthat, 22. 10. 2022 22:49)https://sib-ovz.ru/community/profile/prokach_ana19910756/ Anabolic steroids and muscle growth
I promised.
(Bal, 22. 10. 2022 8:32)Hi, this is Jeniffer. I am sending you my intimate photos as I promised. https://tinyurl.com/22qkk3vx
gloomy fourteen
(Lamonthat, 21. 10. 2022 9:39)https://www.tanetmotor.co.th/community/profile/prokach_ana18633012/ Winstrol fat loss cycle
Free printable calendar
(Toribrogy, 21. 10. 2022 8:58)
Magnificent items from you, man. I've take into accout your stuff prior to and you are just too wonderful. I really like what you have bought here, really like what you're saying and the way in which wherein you assert it. You make it entertaining and you continue to care for to stay it sensible. I can't wait to read far more from you. That is really a terrific web site.
If you should you have any ideas or techniques for my new blog https://indigorosee.com/2021/01/24/how-to-prepare-for-a-successful-semester/ - free monthly calendars please share!
CymnsynC Attife Attife
(OlexCymnsynC, 20. 10. 2022 9:27)noclegi pracownicze Augustów https://www.noclegipracownicze-augustow.online Attife Attife Attife noclegi augustow ul. turystyczna noclegi pracownicze nieopodal suwalk noclegi pracownicze nieopodal augustowa nocleg w augustowie noclegi pracownicze nieopodal suwalk
black childish
(Lamonthat, 20. 10. 2022 8:24)https://testoposicionescorreos.es/foro-oposiciones-correos/profile/prokach_ana24326901/ Deca steroids
мега ссылка
(Rositamof, 20. 10. 2022 1:31)
Pascal - Pascal-skola
-
Admin - ":
Новейший DARKNET MEGA MARKET площадка, достойная замена гидре в даркнете. Моментальные переводы - после оплаты товара деньги сиюминутно зачисляется на счет дилера. Шифрование данных - личные данные о клиенте надежно защищены от спецслужб. Mega SB https://megadmeovbj2ahqw3reuqu1gbg5meixha.xyz - это достойная платформа с большим ассортиментом товара и чесными дилерами.
мега darkshop
(Rositamof, 19. 10. 2022 23:38)
Pascal - Pascal-skola
-
Admin - ":
Что есть на Мега? 5 000+ дилеров со всевозможными позициями. Вы определенно найдете нужный. Обменник - возможность приобрести биток на Mega, обменяв qiwi. Анонимные записки между пользователями Privnote. Нет необходимости использовать Telegram. Решение конфликтных ситуаций с модератором через «диспут». И это далеко не все. На сайте даже есть отдельная страница со всеми фишками и особенностями данного сервиса https://mega555kf7lsmb45yd6etzginolhxxi6ytdoma2rf77ng.com .
Мешки для мусора производство и поставка в разные страны
(Thurmten, 19. 10. 2022 3:26)
цветные бахилы
бахилы 40 мкм
мешки для мусора пнд
=https://www.proizvoditeli-rossii.ru/upakovka/14331-mirpack-polietilenovaya-produkciya-v-vel
Nice printable yearly calendar
(Nilmes, 18. 10. 2022 22:10)
A schedule can be a useful tool for keeping capture of the time. Chestnut can make use of calendars to nourish course of important dates and events in one’s life.
When printed, calendars are undemanding to transmit around. They can be tempered to as a convenient thoughts back of upcoming events, such as birthdays, graduations, weddings, or holidays. This can help a личность plot ahead and circumvent making last-minute plans.
New https://t.me/s/printable_calendar - printable calendar 2023 is a scrupulous and mild to use weapon in pecking order to hold keep up with of your events. It is a brilliant increment to your organization. The printable almanac has the flexibility to donate all the events that are grave to you in in unison place. Oblige your derogatory schedule online with the help of the printable calendar.
Мешки для мусора производство и поставка в разные страны
(Thurmten, 18. 10. 2022 20:57)
экологичные пакеты для мусора купить
прозрачные мешки для мусора
мешки для мусора длина 60
=https://almetevsk.cataloxy.ru/firms/meshki-almetevsk.ru.htm
Мешки для мусора производство и поставка в разные страны
(Thurmten, 18. 10. 2022 4:06)
мешок для мусора 200л
толщина мусорного пакета
мешок д мусора 120л 10шт
=https://poisk-firm.ru/city/gudermes/company/2089382
Керамзит Плотность
(Josephgok, 17. 10. 2022 23:05)
А вот при устройстве кровли существует несколько иной метод: сначала подготавливается пустотное пространство (пустота получается при сооружении внутренней и внешней обрешетки), на обрешетки настилается пароизоляционная пленка, пустоту которой заполняют керамзитом https://al-keram.ru/catalog-keramzit/keramzit-v-big-begah-fraktsii-10-20-m250-300-detail.html
Узнав как утеплить пол керамзитом, удастся качественно и достаточно просто своими руками выполнить описанные способы должным образом даже без наличия опыта проведения подобных работ, соблюдая в точности указанную последовательность действий каждого из способов и приведенные рекомендации на практике https://al-keram.ru/catalog-keramzita/catalog-keramzita-rossypyu.html
Если проводится монтаж полового покрытия на первом этаже, тогда следует помнить что толщина керамзита должна быть более 10 см https://al-keram.ru/stati/keramzit-5-10-mm-sferi-primeneniya.html
Это позволит получить оптимальный коэффициент теплоизоляции https://al-keram.ru/blog/vreden-li-keramzit-dlya-zdorovya-mnenie-ekspertov.html
Точность определения расхода керамзита относительна https://al-keram.ru/stati/keramzitobetonnie-bloki.html
Разброс в расчетах может получиться значительным, это надо учитывать при приобретении материалов для создания стяжки пола https://al-keram.ru/
Сначала по совету знакомых купил в ГК керамзитобетонные блоки для постройки дачи https://al-keram.ru/catalog-keramzita/catalog-keramzita-v-meshkah.html
Качество устроило, поэтому купил тут же керамзит для утепления крыши https://al-keram.ru/catalog-keramzita/catalog-keramzita-v-meshkah.html
Замена Лобового Стекла В Москве
(Daviddew, 17. 10. 2022 21:48)
Далее надо примерить стекло на место, где оно будет установлено в будущем https://stostekol.ru/remont-avtostyokol/
При необходимости можно делать небольшие пометки маркером https://stostekol.ru/zamena-avtostyokol/
Также могут помочь специальные упоры, которые присутствуют на большинстве современных автомобилей и помешают неопытному автомобилисту установить лобовое стекло неправильным образом https://stostekol.ru/zamena-avtostyokol/
1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | 50 | 51 | 52 | 53 | 54 | 55 | 56 | 57 | 58 | 59 | 60 | 61 | 62 | 63 | 64 | 65 | 66 | 67 | 68 | 69 | 70 | 71 | 72 | 73 | 74 | 75 | 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 | 91 | 92 | 93 | 94 | 95 | 96 | 97 | 98 | 99 | 100
https://www.youtube.com/channel/UC5zUUkSbpTLXyfaujCPQiDA/videos - С Чего Начать Худеть Женщине После 50
(AlfredClild, 30. 10. 2022 0:01)