Matematické Fórum

Nevíte-li si rady s jakýmkoliv matematickým problémem, toto místo je pro vás jako dělané.

Nástěnka
22. 8. 2021 (L) Přecházíme zpět na doménu forum.matweb.cz!
04.11.2016 (Jel.) Čtete, prosím, před vložení dotazu, děkuji!
23.10.2013 (Jel.) Zkuste před zadáním dotazu použít některý z online-nástrojů, konzultovat použití můžete v sekci CAS.

Nejste přihlášen(a). Přihlásit

#1 22. 04. 2011 11:28

Pivonkacz
Zelenáč
Příspěvky: 3
Reputace:   
 

Vypsani cisel v pascalu

Ahoj,
jak ma vypadat program, do ktereho kdyz napisu napr. cislo 10, tak mi vypise cisla pozpatku: 10, 9, 8 apod... pod sebe.

Kdyz udelam:

program vypsanin;
var
x,y:integer;

begin
writeln ('Zadejte prosim cislo');
readln (x);
while x>0 do

A ted nevim jak pokracovat a jestli mam vubec podminku dobre.
Predem dekuju za pomoc

Offline

  • (téma jako vyřešené označil(a) gladiator01)

#2 22. 04. 2011 11:45 — Editoval pizet (22. 04. 2011 11:47)

pizet
Místo: Levice/Praha
Příspěvky: 459
Reputace:   11 
 

Re: Vypsani cisel v pascalu

↑ Pivonkacz:

Áno, podmienku máš dobre.

V každej iterácí cyklu vypíš hodnotu premennej x a zníž hodnotu premennej x i 1.

Druhá možnosť je použiť cyklus for a kľúčové slovíčko downto - tam sa nebudeš musieť obažovať so znižovaním hodnoty premennej x o 1.

A zdrojový kód obaluj do code tagu - je to tak lepšie čitateľné. ;)


Do you follow my way? Or you just see a black stain swimming in the Milky Way ...
KSP je určený pre študentov základných a stredných škôl, ktorí majú záujem naučiť sa niečo z oblasti algoritmov, logických úloh, programovania a informatiky.

Offline

 

#3 22. 04. 2011 11:55

Pivonkacz
Zelenáč
Příspěvky: 3
Reputace:   
 

Re: Vypsani cisel v pascalu

Takze to ma vypadat takhle ?

program vypsanin;
var
x,y:integer;

begin
writeln ('Zadejte prosim cislo');
readln (x);
while x>0 do
x:=x-1
end;
readln (y);
end.

Offline

 

#4 22. 04. 2011 12:02 — Editoval pizet (22. 04. 2011 12:03)

pizet
Místo: Levice/Praha
Příspěvky: 459
Reputace:   11 
 

Re: Vypsani cisel v pascalu

↑ Pivonkacz:

Ani si si to neskúsila spustiť, inak by si vedela, že nie. ;)

Hint:



A na čo ti je readln(y)?

A v Pascale pred end nemusíš dávať bodkočiarku.


Do you follow my way? Or you just see a black stain swimming in the Milky Way ...
KSP je určený pre študentov základných a stredných škôl, ktorí majú záujem naučiť sa niečo z oblasti algoritmov, logických úloh, programovania a informatiky.

Offline

 

#5 22. 04. 2011 12:06

Pivonkacz
Zelenáč
Příspěvky: 3
Reputace:   
 

Re: Vypsani cisel v pascalu

Jak to ma teda vypadat ?

Offline

 

#6 22. 04. 2011 12:12

pizet
Místo: Levice/Praha
Příspěvky: 459
Reputace:   11 
 

Re: Vypsani cisel v pascalu

No proste tam dopíšeš príkaz, ktorým vypíšeš honotu x.

Nejak takto (pozri, len ak je nutné):


Do you follow my way? Or you just see a black stain swimming in the Milky Way ...
KSP je určený pre študentov základných a stredných škôl, ktorí majú záujem naučiť sa niečo z oblasti algoritmov, logických úloh, programovania a informatiky.

Offline

 

Zápatí

Powered by PunBB
© Copyright 2002–2005 Rickard Andersson