| Autor | Správa |
|---|
Fórum: Backend Téma: problem s vypoctom x na k-tu |
Odpovede: 11
Zobrazenia: 830
| no na tuto temu som uz aj zabudol a neviem ci je to este akutalne, ale teraz mi doplo ze sa ten cyklus for-to-do da v pohode nahradit cyklom repeat-until... takze ak to este potrebujes, tak tu je zdrojak
program mocniny;
var
A,B,X,N: integer;
begin
B:=1;
A:=0;
write('Zadajte cislo: ')... |
|
Fórum: Ostatné Téma: [Pascal] Sucet_int - Zdrojovy kod - velmi surne |
Odpovede: 25
Zobrazenia: 1828
| asi som to nepochopil ale preco tam davate to pole?
1. zadanie intervalu = 2 premenne
2. zadavanie cisel v cykle (1 premenna), porovnanie s intervalom, pripadne pripocitanie (1 premenna)
=> su potrebne 4 ciselne premenne, staci aby bol ako prvy zadany interval a potom az cisla
nj mas pravdu, nad ... |
|
Fórum: Ostatné Téma: [Pascal] Sucet_int - Zdrojovy kod - velmi surne |
Odpovede: 25
Zobrazenia: 1828
| tak sprav mi to s cyklusom for ale nic viac este mozes if then else pouzit ale nic viac, ziadne polia atd. diky
mno ved tam som ti to spravil len s cyklom while - do a podmienkou if-then-else, for-to-do som uplne vynechal... bez pouzitia pola by to imho nebolo mozne , a keby sa dalo, bolo by to v... |
|
Fórum: Ostatné Téma: [Pascal] Sucet_int - Zdrojovy kod - velmi surne |
Odpovede: 25
Zobrazenia: 1828
| njn tu to mas... :D
program sucetcisel;
var
Pole: array[1..200] of integer;
A,B,X,Y,Sucet: integer;
begin
Sucet:=0;
X:=1;
Y:=1;
writeln('Program na vypocet suctu cisel zadanych z klavesnice,');
writeln('ktore sa nachadzaju v urcitom intervale.');
writeln('Pre ukoncenie ... |
|
Fórum: Ostatné Téma: [Pascal] Sucet_int - Zdrojovy kod - velmi surne |
Odpovede: 25
Zobrazenia: 1828
| stopa27 hmm no mne to vyslo trochu kratsie :oops:
program sucetcisel;
var
Pole: array[1..200] of integer;
A,B,X,I,Sucet: integer;
begin
Sucet:=0;
X:=1;
writeln('Program na vypocet suctu cisel zadanych z klavesnice,');
writeln('ktore sa nachadzaju v urcitom intervale.');
writ... |
|
Fórum: Ostatné Téma: porovnavanie 3 premennych a vypis min a max |
Odpovede: 9
Zobrazenia: 1779
| mozno by sa to dalo aj nejako lepsie, pomocou cyklu, ale teraz vecer mi to uz dako nemysli :yawn:
var
Max,Min,A,B,C: real;
X: integer;
begin
write('Zadajte prve cislo: ');
readln(A);
Max:=A;
Min:=A;
write('Zadajte druhe cislo: ');
readln(B);
if B>Max then Max:=B e... |
|
Fórum: Frontend Téma: Prekryvanie |
Odpovede: 15
Zobrazenia: 1559
| njn, tak je to najlepsie riesit... skus toto
<div id="header">
<div id="volnemiesto"></div>
<ul>
<li><a class="tlacitko1"></a></li>
<li><a class="tlacitko2"></a></li>
<li><a class="tlacitko3"></a></li>
<li><a class="tlacitko4"></a... |
|
Fórum: Frontend Téma: Prekryvanie |
Odpovede: 15
Zobrazenia: 1559
| hej uz som na to prisiel skor, a teraz mam iny problem, ked uz to tam mam tak to tlacitko potrebujem umiestnit ale ked dam napr. background-position:100px; tak mi to posunie bez problemov dolava ale ked dam top:100px tak mi to neposunie dole
skus nastavit tomu tlacitku
position: absolute; top: 20... |
|
Fórum: Backend Téma: problem s vypoctom x na k-tu |
Odpovede: 11
Zobrazenia: 830
| diky neutronmind ;)
PS. mohol by si prosim ta napisat toto iste ale s cyklusom repeat? :oops:
hm preco s cyklusom repeat?? :? ma to byt tak?? mne sa to dohto moc repeat nehodi, ale sak skusim... :D
//alebo pockaj, myslis to tak, ze sa bude opakovat uplne cely program, tym padom sa budu dat v... |
|
Fórum: Backend Téma: problem s vypoctom x na k-tu |
Odpovede: 11
Zobrazenia: 830
| skus takto, a tie "Zadajte cislo" a "Zadajte N" si zmen, to som tam dal len tak provizorne... :)
program mocniny;
var
A,B,X,N: integer;
begin
B:=1;
write('Zadajte cislo: ');
readln(X);
write('Zadajte N: ');
readln(N);
for A:=1 to N do
B:=B*X... |
|
Fórum: Ostatné Téma: [Pascal] Mocniny - Zdrojovy kod - velmi surne |
Odpovede: 2
Zobrazenia: 2030
| neviem ci som to z toho zadania spravne pochopil, ale skus to takto... :roll:
program mocniny;
var
A,B,I: integer;
begin
write('Napiste rozsah cisel(2 cisla oddelene medzerou): ');
readln(A,B);
for I:=A to B do
begin
write(I);
writeln(I*I*I:10);
end;
... |
|
Fórum: Ostatné Téma: potrebujem nieco z pascalu prosiim |
Odpovede: 13
Zobrazenia: 1059
| ked delis realne cisla tak sa nepouziva operacia div ale / to je asi chyba
presne tak... pokial chces delit realne cislo inymcislom tak, aby bol vysledok zaokruhleny na nula destinnych miest, sprav to takto
program pad;
uses crt;
var S,G,T,V:real;
begin
clrscr;
write('Zadaj hlbku pri... |
|
Fórum: Backend Téma: Potrebujem pomoc s 1 príkazom! |
Odpovede: 6
Zobrazenia: 740
| woops, mas dobry pocit  sorry 
Kód: program lol;
var
meno: string;
begin
readln(meno);
readln;
end. |
|
Fórum: Backend Téma: Potrebujem pomoc s 1 príkazom! |
Odpovede: 6
Zobrazenia: 740
| ...napriklad takto
Kód: program lol;
var
meno: string;
begin
readln('meno');
readln;
end. |
|