Rozdelenie čísel a vytlačenie do tabuľky

Zdravím machri

mal by som ešte jedno zadanie, s ktorým by som potreboval pomôcť. Je to posledné zadanie v tomto semestri, v letnom tento predmet už nemám, takže možno už posledné zadanie vôbec, tak dúfam, že spoločnými silami mi nejak pomôžete to naprogramovať

Termín je do budúcej stredy a znenie:
Zostavte program pre načítanie čísel, ak posledné číslo na vstupe je N. Čísla vytlačte v tabuľke v 2 stĺpcoch takto: kladné párne, kladné nepárne.

Zatiaľ sa len posnažím nejak opísať ako by som to asi riešil a mi povedzte, či na to idem dobre, a potom sa dám/dáme do zdrojového kódu.

Čiže ja by som na to šiel takto:
1. zadefinovať nejaké polia (array) čísel typu real
2. keďže výsledné čísla majú byť kladné (párne/nepárne) zadať podmienku x>0
3. zadať opakovanie, zadávania vstupných čísel až kým x=N
4. zadať podmienku, že x(MOD 2)=0 .. vtedy by bolo číslo pridelené do poľa "kladné párne", ak podmienka nevyhovuje, tak priradiť číslo do poľa "kladné nepárne"
5. writeln ('kladné párne | kladné nepárne')
writeln ('_______________________________________')
a nakoniec nejako pomocou príkazu for ... do writeln a vytlačiť položky jednotlivý polí pod seba do tých stĺpcov aby naoko sedeli pod slovami "kladné párne" a "kladné nepárne"


Čo vy na to?

Prečo typ real, keď má ísť o párne/nepárne čísla (a teda o celé čísla)?

aha, pardon ... tak pole bude typu integer ...

inak si myslíš, že metóda by mohla sedieť?

tak nejako som sa dostal až po tade, ale určite to mám zle a možno sú tam banálne hlúposti, ale bol by som rád a veľmi vďačný ak by ste s na to pozreli a skúsili mi pomôcť.

Nie som si istý tou prácou s poľami, tam to bude asi zle, ale prosím, skúste na to mrknúť.



Ďakujem

EDIT: tú chybu mi vypísalo v tom riadku ako mám if x(MOD 2)=0 a kurzor bliká hneď na začiatku pod i (ako if) ..

Najprv by ma zaujmalo, na aku skolu chodis, ak programujete v pascale pretoze, aj ja v nom programujem, ale ak chcem niekde ist, musim prejst na C.

k veci:
tvoj kod som iba prezrel a hned v nom vidim chybu, ktora do oci bije! Urcite ti tie cisla nevypisuje v tabulke co? Najjdednoduchsie by bolo spravit cez gotoxy. Ak budem mat cas skusim ti to napisat.

//edit:
mod nemas spravne napisany. Robi sa: cislo, ktore chces delit-mod-cislo, ktorym chces delit. V tvojom pripade to bude x mod 2

ja chodím na TU v Košiciach - FBERG - Priemyselná logistika, a tento predmet mám len teraz jeden semester, takže to berieme len z rýchlika a okrajovo.

a cením si tvoju snahu, ale neviem čo sú gotoxy a také niečo sme ani nebrali, takže keď odovzdám zadanie s tým gotoxom, tak profesorovi asi bude jasné, že som to robil inou formou.

Mňa zaujímalo ako to vytlačiť tie čísla do tabuľky hneď po zadaní zadania, tak som sa ho opýtal a naznačil mi túto metódu, že pomocouwriteln mám spraviť takú provizórnu tabuľku. Takže estetické chyby, ak to nebude presne do tabuľky, nebudú vadiť, lenže mne to zatiaľ nebeží vôbec. Nechce mi skompilovať, bude niekde chyba v zdrojovm kóde :-/

A ja mám skôr podozrenie že som to spackal niekde v tých príkazoch ..

EDIT: takže ten mod nebude v zátvorke?

// pridané po 5 minútach od posledného príspevku

veď tak to mám napísané x (mod 2), lenže ak chcem zistiť či sú párne, musím zadať podmienku, či sa to =0, nie?

pretože ak sa to rovná 0, znamená že číslo sa dá bezozvyšku deliť 2, čiže je párne ..

// pridané po 5 minútach od posledného príspevku

Dobre, opravil som malé nedostatky ako bodkočiarka atak a vypísalo mi 9 ďalších chyb a všetky sa týkajú tej práce s poľami. Takže je jasné, že som zle narábal s tými poľami.

Skúste mi potom prosím poradiť inú metódu, alebo ako to urobiť cez tie polia..

Takto by som to robil ja:


Trochu nechapem tomu zadaniu: Ak posledne cislo na vstupe je N... Riesil som to tak, ze skonci ked sa to N bude rovnat NACITANEMU CISLU z cyklu. Program vypise tie cisla v stlpci. Ak sa s tym trocha pohras, neje problem este vykreslit tabulku. Gotoxy nieje nic hrozne, len presuvas kurzor po riadkoch a stlpcoch.

V tvojom kode je plno chyb napr.:
Mas 2 cykly zacinajuce repeat a while, ale ukoncil si len jeden cyklus. Ten while je zbytocny. Samozrejme, ze o praci s polami nemas ani sajnu.

hej hej, tak to má byť, že ako prvé zadáš N - čiže posledné číslo na vstupe a cyklus sa bude opakovať až dokým nezadáš číslo ktoré, ktoré sa bude rovnať tomu N.

Pozerám na tvoj program, a niečomu aj chápem niečomu nie. Budeš taký dobrý priblížiť mi, ako si to robil, aby som o tom mal šajnu ?

Tak najprv skúsim opísať čomu chápem. Robil si to tak, že pole a sú párne čísla a pole b sú nepárne čísla, že ?

i a j sú vlastne počítadlá, že keď je číslo párne alebo nepárne, priradí ho do daného poľa s indexom i/j, pričom ďalšie zadané číslo sa po vyhodnotení zase rozdelí do poľa podľa párnosti/nepárnosti už so zväčšeným indexom o 1. čiže v danom poli vystupuje to číslo s indexom zväčšením o jedna, od predchádzajúceho čísla.

d si dal ako pomocnú premennú pri výpočte, či sa x mod 2 rovná 0, že ?

potom nasleduje priradenie spolu s tými indexmi do daných polí.


po tadiaľ chápem, ak som niečo zle pochopil, tak ma prosím oprav


a ešte by som bol rád, keby si mi priblížil ako funguje tá funkcia gotoxy. Keď dobre chápem a pozerám, tak gotoxy je posunutie kurzora na pozíciu, ktorá je udaná v zátvorke, že?

potom ku koncu ako deklaruješ n, p a m, to sú vlastne začiatočné súradnice, podľa ktorých sa hýbeš v riadkoch pomocou príkazu gotoxy, že?

nechápem len, tej poslednej časti:

for k:=1 to i-1 do begin
gotoxy (m,n);
writeln (a[k]);

for l:=1 to j-1 do begin
gotoxy (m,p);
writeln (b[l]);

prečo je tam k:=1 to i-1 a potom writeln (a[k]) a podobne v druhom riadku potom l:=1 to j-1 a writeln (b[l]), keď sme začali ukladať čísla do polí pod indexmi a[i] a b[j] ?

Inak vrelá vďaka a skladám poklonu


EDIT: už som prišiel aj na to, prečo k:=1 a I:=1, že k a I sú vlastne indexy jedna, čiže pod nimi vystupujú prvé čísla v daných poliach .. takže ostáva mi len jedna otázka, že prečo sa tlačí
to i-1 a to j-1 ... prečo tam nebude to i a to j ? veď tlačíme až do konca, nie? nie po predposledné číslo .. lebo číslo s indexom i/j-1 je predposledné, nie?

Doplnil som aj tu tabulku. Vyzera to takto:


screen:


Tu je vysvetlene co je gotoxy: http://www.trsek.com/pascal/prikazy
Ano, cez gotoxy presunies kurzor, na poziciu, ktora je v zatvorke.
Mna nenapada okrem gotoxy nic, ako by sa to este dalo spravit.
Dobra stranka na zaklady pascalu je tato: http://www.programovanie.kromsat.sk/prog-b/index.htm

Takze premenne /i,j,k,l/ su riadiace premenne, a udavaju aktualny prvok pola.
Pole sa nikdy nenacitava cele! ale iba po jednotlivych prvkov. Na to tam je cyklus for. Takze ak napr: i:=3 tak a[i] bude treti prvok v poli.
Nieco o jednorozmernych poliach najdes tu: http://www.viliam.bur.sk/sk/2007-11-04/ ... yku-Pascal

Ďakujem ti veeeeľmi pekne a máš moje uznanie

ferdo93: tvoj kod je strasne neprehladny (pismenkove nazvy premennych, kto sa v tom ma vyznat), pouziva zbytocnosti (gotoxy), nadbytocny pocet "riadiacich" premennych a vypisuje skaredu tabulku, skus daco takehoto:

Ja viem, to je moj zlozvik Nechce sa mi pisat cele nazvy. To iste mi hovori aj nasa profka. Ja som si uz nejak na to zvykol, a priblizne viem, ktore pismena sa na co pouzivaju (a,b: array, i,j...: cyklus, x,y: string,char...)

aj ja ked som zacinal tak som pouzival jednopismenkove nazvy premennych, ale proste ked svoj zdrojak davas niekomu inemu (napr. ho tu zverejnujes), tak ti ostatni maju dost velky problem sa v tom orientovat, obzvlast pokial mas dane na vstupe cislo N a ty si ho oznacis ako c..

Ahojteee potrebovala by som mensiu pomoc
mam za ulohu v skole zostavit program v PASCALE a neviem ako na to :/
uloha znie: Zostavte programe pre načítanie N čísel. Číslo vytlačte v tabuľke v 4 stĺpcoch: kladné párne, kladné nepárne.

Ahoooooj, skús najprv objaviť tlačítko "Nová téma", tým založíš novú tému. A potom skús vyvinúť aj trochu snahy, domáce úlohy ti tu niekto riešiť nebude. Ak máš konkrétny problém, pomôžeme.

dakujem za odpoved akooo ja uz to robim asi 3 krat a nejde mi to staleee :/ neviemmm uz fakt co mam s tym robit

Tak ukáž, ako to robíš a čo ti nejde.