Stránka 1 z 3

Programování v Delphi

Napsal: 08 bře 2012 22:16
od JuReeeC
Mám udělat algoritmus tohoto:
Program načte neprázdnou posloupnost celých nenulových čísel ukončenou číslem nula a zjistí, zda je tato posloupnost klesající (další číslo vždy menší než předchozí).

Nemá někdo nějaký nápad jak by to mohlo vypadat? :smile: prosím

Re: Programování v Delphi

Napsal: 08 bře 2012 22:19
od CZechBoY
načtu první číslo, uložim někam
načtu další číslo, pokud je menší než předchozí tak je klesající

Re: Programování v Delphi

Napsal: 08 bře 2012 22:49
od faraon

Kód: Vybrat vše

klesající:=true;
načti(číslo);
minulé:=číslo;

dokud (číslo<>0)
      načti(číslo);
      když číslo<minulé tak
           minulé:=číslo
      jinak
           klesající:=false
      konec

A pak vhodným způsobem zobrazit výsledek ;-)

Re: Programování v Delphi

Napsal: 08 bře 2012 23:03
od JuReeeC
Faraone mohl bys mi ty slova nahradit tim, co tam mam napsat? Misto toho klesajici treba? Cim to mam nahradit?

Re: Programování v Delphi

Napsal: 08 bře 2012 23:20
od faraon
To zrovna nemáš nahradit ničím, protože to je proměnná typu boolean. Ty další dvě jsou integer, předpokládám že v takovéhle úloze nepracuješ s reálnými čísly.

Všechno ostatní najdeš v každé učebnici Pascalu.

Re: Programování v Delphi

Napsal: 08 bře 2012 23:29
od JuReeeC
Takze treba to cislo mam oznacit B a minule A a obe budou integer?

--- Doplnění předchozího příspěvku (08 Bře 2012 23:30) ---

Takze treba to cislo mam oznacit B a minule A a obe budou integer?

Re: Programování v Delphi

Napsal: 08 bře 2012 23:37
od faraon
Označ je cislo a minule, ať je na první pohled vidět co v nich je. Stejně tak klesajici, pokud bys nechtěl použít výčet, tam by se tenhle název nehodil. Ale pro tenhle příklad by to bylo zbytečně komplikované.

Jednopísmenné názvy používej pouze pro indexování cyklů, nebo pokud mají jen velmi omezenou dobu platnosti, třeba při swapování proměnných:

Kód: Vybrat vše

když první<druhé
     w:=první;
     první:=druhé;
     druhé:=w
     konec


V jiném případě proměnné vždy pojmenuj celým slovem nebo více slovy, tak aby název přesně popisoval co v nich je uložené. Ušetříš si tím hodně práce při ladění 8)

Re: Programování v Delphi

Napsal: 08 bře 2012 23:41
od JuReeeC
Aha, takze nic menit. A dokaze to delhpi takle precist? My jsme meli zatim 3 Cvika a uz mame program a fakt vubec nevim co psat

Re: Programování v Delphi

Napsal: 08 bře 2012 23:54
od faraon
Hádám že na prvním cvičení jste se učili jak Delphi zapnout a vytvořit projekt, na druhém hlavní typy proměnných - integer a real, a příkazy pro vstup a výstup, a na třetím větvení programu - if, then, else, a základní cykly - for, while, repeat... Víc není pro tenhle program potřeba, vlastně ani tohle všechno se nevyužije :smile:

Re: Programování v Delphi

Napsal: 09 bře 2012 00:14
od JuReeeC
Tak ja to zkusim napsat tak jak jsi mi to napsal,akorat to napisu anglicky a dam tu vypis a zkontrolujes mi to jo? :-) jde videt, ze tomu dost rozumis

--- Doplnění předchozího příspěvku (09 Bře 2012 00:45) ---

Tak ja to zkusim napsat tak jak jsi mi to napsal,akorat to napisu anglicky a dam tu vypis a zkontrolujes mi to jo? :-) jde videt, ze tomu dost rozumis

--- Doplnění předchozího příspěvku (09 Bře 2012 01:27) ---

Zasekl jsem se u načtení, co tam mám načíst? :?

Re: Programování v Delphi

Napsal: 09 bře 2012 10:38
od CZechBoY
pokud to je konzolová aplikace tak řádek z konzole, jinak nejspíš z textboxu

Re: Programování v Delphi

Napsal: 09 bře 2012 12:55
od JuReeeC
To vím, ale jakou proměnnou mám načíst přímo v tomto zadání