-
Pranešimai
2.321 -
Užsiregistravo
-
Lankėsi
-
Laimėta dienų
2 -
Atsiliepimai
100%
Turinio tipas
Forumas
Kalendorius
Parduotuvė
Akademija
Skelbimai
Andrius. Pranešimai
-
-
-
Gal domintų šis laikrodis?
Ačiū už pasiūlymą, bet nedomina.
-
Veikia, dėkui labai. ;)
-
Sveiki,
pas ką xp windowsai, gal galite nueiti į C:\Windows\System32 ir iš ten pauploadinti kur nors (kad ir čia) du failus: spider.exe ir cards.dll
Ant windows 7 yra kitokia spider solitaire versija, o man reikia senosios. Kiek skaičiau internete, tai senoji veikia tiesiog su šiais dviem failiukais.
Jeigu kam nesunku, prašau atsiųskite į pm arba pauploadinkite kur nors. :)
-
Papildziau kaip bus visa tai organizuojama savo pirma
posta ir
reikes nusiusti nuoroda, daikto pavadinima
ir URL
Nu va, dabar jau panašiau. ;)
-
Galetum siaip ir cia viska isdestyti, atrodytu rimciau :rolleyes:
Pritariu tau, nes dabar eik į kažkokį fb puslapį, skaityk kažką angliškai... Per daug vargo...
Temos autoriau, jeigu nori pritraukti žmonių, tai malonėk viską aiškiai, gražiai ir lietuviškai išdėstyk šioje temoje. ;)
EDIT:
Tingiu daug rasyt.
Na su tokiu požiūriu belieka tik palinkėti sėkmės...
-
Spėju tiesiog nuo skambinimo batarkė išsikrovė ir viskas... Galbūt kas nors ir ras begrybaudamas visą sušlapusį ir nebeveikiantį. :lol: :lol:
-
Iš š*do varškę bando padaryti. Koks skirtumas koks tas brūkšninis kodas? Vistiek niekas nežiūri į jį... :rolleyes:
-
Važiuoji ir viskas. Niekas ten netikrina ir niekam tu neįdomus... :rolleyes:
-
-
Kiek daug maž laiko šviečia tarkim su duracel arba kokiom kitom ne pačiom pigiausiom batarkėm?
-
O paštu nesiunti?
-
Per mythbusterius pamenu šaudė iš tokių. :lol:
-
žalias ekranas tai čia sakykim kaip nokijos 3310 ar koks kitoks?
Man atrodo jis čia kalba apie tą žalią foną, kur būna prieš jį veda tv laidas (pvz. orus) ir programiškai ant tos žalios spalvos uždeda kokį nors foną. :rolleyes:
-
-
Vaizdo plokštė parduota!
Liko procesorius ir motininė.
-
NEBEREIKIA
-
program Vyðnios;
type Masyvas = array[1..500] of longint;
var a, b, c, r, ap : real;
n, i: integer;
kiek : Masyvas;
begin
writeln('Paraðykite vyðnios skersmená r milimetrais');
readln®;
r := r / 10 / 2; {Verèiam spindulá á centimetrus}
writeln('Paraðykite kiek dëþiø turime');
readln(n);
for i := 1 to n do
begin
writeln('Paraðykite dëþës iðmeras a, b, c, nemaþesne kaip 50 cm');
readln(a,b,c);
if a>=50 then if b>=50 then if c>=50 then
ap := a*b*c;
kiek := trunc ((ap / 2 / ((4/3) * Pi * r * r * r)));
end;
i := 0;
for i := 1 to n do
begin
Write(kiek); Write( ' Tiek vyðniø telpa á ') ;Write(i); Writeln('-àjà dëþæ'); WriteLn();
end;
Readln;
end.
- Dirko11111 sureagavo į tai
-
1
-
Tai tu imesk i fps ir paziurek nes as nezinau kaip paiskint man atrodo kad ciklas blogai veikia nes kada ivedi tarkim 3 dezes ivedi matmenis ir paspaudi enter turetum rasyti kitos dezes matmenis o programa tau duoda atsakyma nepriklausomai nuo to kiek tu parasysi deziu ar 2 ar 3 ir taip toliau
Nu tai suvesk kitos dėžės matmenis ir tada vėl gausi atsakymą ir t.t. O jeigu nori tu pirma suvesti N dėžių matmenis, o po to gauti rezultatus, tai tada jau reikia visus duomenis dėti į masyvus. Ar tokį dalyką moki?
Bet vistiek aš tau dar kartą sakau, kad tau reikia ne kiekvienos dėžės vyšnių skaičių, o visų dėžių vyšnių skaičių atspausdint.
- Dirko11111 sureagavo į tai
-
1
-
Tai paaiškink kas konkrečiai nepavyksta?
EDIT: Vien tik dėl tavęs atsisiunčiau fps compilerį ir pažiūrėjau kas tau ten neveikia... :angry:
Forume eilutę, kur nusiskaito vyšnių skersmenį ( r ) atpažino kaip tokį ženklą ®, kurį tu tiesiai kopijuoji į compilerį ir tau niekas neveikia. Pataisyk ir bus gerai.
Ir ten neprivesk labai didelių skaičių dėžės matmenims, nes kai apskaičiuoja tūrį, gaunasi labai didelis skaičius ir peržengia rėžius. Dar dėl to gali mest klaidą.
- Dirko11111 sureagavo į tai
-
1
-
Tai įvesk dėžių skaičių tarkim 3. Suvesi pirmos dėžės matmenis ir tau parašys kiek ten vyšnių telpa. Po to suvesi antros dėžės matmenis ir vėl tau parašys kiek telpa ir t.t.
Beje, bet vistiek aš tavo pirmo posto sąlygoje matau, kad uždavinys reikalauja kiek IŠ VISO vyšnių bus suberta, o ne kiek į kiekvieną dėžę. :rolleyes:
- Dirko11111 sureagavo į tai
-
1
-
Senai su paskaliu kažką programavau, tai gerai nebeprisimenu sintaksės. Na bet kažkas tokio:
program Vyšnios;
var a, b, c, r, ap : real;
n, i: integer;
kiek : longint;
begin
writeln('Parašykite vyšnios skersmenį r milimetrais');
readln®;
writeln('Parašykite kiek dėžių turime');
readln(n);
for i := 1 to n do
begin
writeln('Parašykite dėžės išmeras a, b, c, nemažesne kaip 50 cm');
readln(a,b,c);
if a>=50 then if b>=50 then if c>=50 then
ap := a*b*c;
r := r / 10 / 2; {Verčiam spindulį į centimetrus}
kiek := trunc ((ap / 2 / ((4/3) * Pi * r * r * r)));
WriteLn(kiek); Writeln( ' Tiek vyšnių telpa į ') ;Writeln(n); Writeln('-ąją dėžę');
end;
Readln;
end.
- Dirko11111 sureagavo į tai
-
1
-
Esmė maždaug tokia:
* Nusiskaitai kiek yra dėžių.
* Suki n kartų ciklą.
* Cikle kreipiesi į funkciją, kurioje yra kubo kraštinių nusiskaitymas, rezultato apskaičiavimas ir rezultatų išspausdinimas.
EDIT: Kaip supratau tau čia reikia suskaičiuoti kiek IŠ VISO bus suberta vyšnių, o ne kiek į kiekvieną dėžę atskirai. Tai tada funkcija nusiskaito dėžės matmenis ir grąžina rezultatą kiek toje dėžėje telpa vyšnių. Ir tą rezultatą sumuoji. O po to už ciklo ribų atspausdini.
EDIT2: Na jeigu nenori kurt funkcijos, tai viską gali rašyti tiesiog cikle. ;)
- Dirko11111 sureagavo į tai
-
1
-
Tai juk sweed kortele turesi ir vedi pinigus mamai..Prisijungsi prie el.bankininkystes ir nusiusi jai pinigus..
Bet tai algą jam mokės jaučiu ne į lietuvišką kortelę... :rolleyes:
Aukcijonas! naudotas nokia 2610
Elektronikos prekės
Atrašyta · Redagavo Andrius.
10 Lt, jeigu ekranas ar dangtelis nesuskaldytas ir viskas gerai veikia.
Beje, kokia komplektacija?