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ářů
Steam Desktop Authenticator its a esktop emulator of the Steam authentication mobile application. This program completely replaces the mobile phone. With its help, you can enter Steam, confirm transactions on the market and exchanges.
Source:
- https://gthub.org/Jessecar96/SteamDesktopAuthenticator
steam desktop authenticator
Black caviar not in a jar
(Kendyrutle, 28. 2. 2023 15:04)
In order for caviar to be stored as long as possible, it must initially be fresh
After opening, even in the refrigerator, caviar can lie for a certain time - as a rule, no more than 3 days
There is an option to purchase black caviar not in a jar, but by weight
When defrosting, instead of expensive caviar, an incomprehensible porridge with a fishy smell may appear on the festive table
At home, black caviar is optimally placed in a glass container.
https://fokachos.com/
How to us google search engine
(Merlewap, 28. 2. 2023 0:10)I would like to as a result of you an eye to the efforts youve got produced in article this post. I am hoping the literal unaltered most https://googles7.com
thanks, interesting read
(kzkazonect, 27. 2. 2023 12:20)Cool, I've been looking for this one for a long time
nice to foregather you!
(ArthurFuh, 26. 2. 2023 22:04)
Hi,
outgoing to foregather you! Frustrate me begin myselft
31 yrs old Science Technicians Mcqueeney from Noelville, has numerous pursuits including interior design, and poole pottery. Finds motivation by making a vacation to Monastery of Batalha
https://handymanfloridarylanvist.bloggersdelight.dk/2023/02/26/exactly-how-for-you-to-assamble-furniture/
coursework marking m14mfw
(Albertopaymn, 26. 2. 2023 10:05)
Seriously loads of fantastic knowledge.
interesting for a very long time
(Kkkazhbuida, 26. 2. 2023 2:42)Thanks, I've been looking for this for a long time
Cool, I've been looking for this one for a long time
(KkkzellRom, 25. 2. 2023 5:44)Cool + for the post
https://telegra.ph/Promokody-dragon-money-2022-02-20#РџСЂРѕРјРѕРєРѕРґС‹ dragon money 2022
(Brianhog, 24. 2. 2023 12:45)
https://telegra.ph/Promokod-dragon-money-02-20#РџСЂРѕРјРѕРєРѕРґ dragon money
Slot303 : Situs 303 Slot 5000 4D Slot Slot303 Login
(Davidtes, 22. 2. 2023 23:26)Slot303 berisi beberapa website 303 slot 5000 dengan ide slot 4D yang dipastikan sangat aman dan terpercaya untuk seputar pecinta slot303 Bergabung. Link website : https://slot303.io
innosilicon
(JerryGer, 22. 2. 2023 13:27)
Innosilicon A10 Pro+ 500MH/S 6G Ethash Miner: A Game-Changing Solution for Cryptocurrency Miners
Cryptocurrency mining has been gaining popularity over the years due to its potential to earn massive profits. However, to maximize the profits, miners need to use the best equipment available in the market. This is where Innosilicon comes into play. Innosilicon is a leading manufacturer of cryptocurrency mining equipment, and its latest product, the Innosilicon A10 Pro+ 500MH/S 6G Ethash Miner, is a game-changer for miners.
The Innosilicon A10 Pro+ 500MH/S 6G Ethash Miner is a high-performance mining rig that is designed to mine Ethereum and other cryptocurrencies using the EtHash algorithm. It boasts a maximum hashrate of 500Mh/s±5% for a power consumption of 750W, making it one of the most efficient miners in the market.
The A10 Pro+ 500MH/S 6G Ethash Miner features a state-of-the-art 6GB GDDR6 memory that ensures high-speed data processing and efficient performance. This is crucial for cryptocurrency mining, as it requires a significant amount of data processing power to mine cryptocurrencies successfully.
What sets the Innosilicon A10 Pro+ 500MH/S 6G Ethash Miner apart from its competitors is its power efficiency. The miner's power consumption of 750W is significantly lower than its competitors, making it an ideal solution for miners who are conscious of their energy consumption.
In addition, the A10 Pro+ 500MH/S 6G Ethash Miner is incredibly easy to set up and use. It comes with a user-friendly interface that makes it easy for even novice miners to start mining cryptocurrencies right away. The miner is also compatible with various mining pools, allowing miners to choose the pool that best suits their needs.
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

steam desktop authenticator
(Waynedot, 2. 3. 2023 13:13)