Pascal HELP

M4x · Napísal **M4x**: 15.03.2012 13:26

Takze cawte prave sa ucim prgramovat ako samonuk, cital som na nete ze pascal je na zaciatocnika asi ta naj jazyk, tak som sa do toho pustil ale mam taky malicky problem jednej veci nechapem :
Zdrojovy kod :

Kód:

Program Prevraceni1;

var     delka:integer;
        poradi:integer;
        vstupni:string;
        vystupni:string;
        konec:string;

begin
 begin
  writeln('Zadej vstupní řetězec (max. 255 znaků): ');
  readln(vstupni);
  delka := length(vstupni);
 end;
   for poradi:=1 to delka do
     begin
      vystupni[poradi]:=vstupni[delka-poradi+1];
      vystupni:=vystupni+vystupni[poradi]
     end;
 begin
  writeln();
  writeln('Převrácený řetězec: ', vystupni);
  readln();
 end;
end.

Takze idem k veci .. ak sa pozrieme na riadok a budeme chciet napriklad prehodit slovo jozef
vystupni[poradi]:=vstupni[delka-poradi+1];
vystupni[1]:=vstupni[5-1+1]
.
.
.
A tak to prejde kazde poradie, to chapem ale ten dasi riadok velmi nechapem ... vobec neviem naco tam ten riadok je :
vystupni:=vystupni+vystupni[poradi]
Prosim daku dobru dusu ktora by mi to vysvetlila.
a na koniec Karma funguje vsetko sa vam raz vrati

F3RY · Napísal **F3RY**: 15.03.2012 14:37

No, je to nejaky divny kod. Ak sa ucis programovat, tak preco zacinas s takymi blbostami? Odporucam: http://www.programovanie.kromsat.sk/prog-b/index.htm Mas to tam podla kapitol a vsetko vysvetlene.
Je to dost neprehladne. Lepsie by bolo pouzit prikaz downto.

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

Kód:

uses crt;
var x:string;
    a,i:integer;
begin
 clrscr;
 writeln ('Zadaj vetu');
 readln (x);
 a:=length(x);
 for i:=a downto 1 do write (x[i]); 
 readln;
 end.

presne to iste. Snad to lepsie pochopis.

M4x · Napísal autor témy **M4x**: 15.03.2012 14:39

F3RY píše:

No, je to nejaky divny kod. Ak sa ucis programovat, tak preco zacinas s takymi blbostami? Odporucam: http://www.programovanie.kromsat.sk/prog-b/index.htm Mas to tam podla kapitol a vsetko vysvetlene.
Je to dost neprehladne. Lepsie by bolo pouzit prikaz downto.

Ja sa ucim podla knihy http://www.martinus.sk/?uItem=62331 takze preto sa pytam co ten riadok znamena, lebo ak citam ten kod vsetkoemu chapem okrem toho riadku co som napisal ... No a ako sa mam ucit ja mam taky plan ... prjdem si tu knihu co som dal hore link hore , potom prejdem na
http://www.martinus.sk/?uItem=74741
http://www.martinus.sk/?uItem=59703
http://www.martinus.sk/?uItem=29996
to chcem na zaciatok tak na 1 rok mam co robit ... mozno pol roka .. a potom sa pustit na
http://www.martinus.sk/?uItem=37573
http://www.martinus.sk/?uItem=41491
A podla mna to nie je blbost sa pytat na riadok ktoremu nechapem ...
A s prikazom downto som sa este nestretol .. ale ako sa pozeram na to cos i napisal dava to zmysle ..

F3RY · Napísal **F3RY**: 15.03.2012 15:18

string je vlastne retazec znakov. V zatvorkach [ ] uvadzas aktualny prvok v poli/retazca. Napriklad mas slovo nacitane v stringu: "ahoj" a v zatvorke mas uvedene [3], aktualny prvok bude "o" Chapes?
Takze:

Kód:

vystupni[poradi]:=vstupni[delka-poradi+1];

dlzka bude 13 znakov - poradie 1 + 1 = 13 Kedze prikaz for ide od zaciatku, tak pismeno, ktore bolo 1. teraz je posledne...

Kód:

vystupni:=vystupni+vystupni[poradi]

toto ti tie znaky pouklada, alebo co. Jednoduchsie by bolo zaraz pomocou prikazu write ich vypisovat.
Nehapem tie begin prikazy. Kod si pisal ty? alebo si to stiahol? Myslim, ze tie prikazy ani netreba.
Downto ti zacina cyklus od konca.

M4x · Napísal autor témy **M4x**: 15.03.2012 15:30

F3RY píše:

string je vlastne retazec znakov. V zatvorkach [ ] uvadzas aktualny prvok v poli/retazca. Napriklad mas slovo nacitane v stringu: "ahoj" a v zatvorke mas uvedene [3], aktualny prvok bude "o" Chapes?
Takze:

Kód:

vystupni[poradi]:=vstupni[delka-poradi+1];

dlzka bude 13 znakov - poradie 1 + 1 = 13 Kedze prikaz for ide od zaciatku, tak pismeno, ktore bolo 1.

Jo jo toto chapem ...

F3RY píše:

Kód:

vystupni:=vystupni+vystupni[poradi]

toto ti tie znaky pouklada, alebo co. Jednoduchsie by bolo zaraz pomocou prikazu write ich vypisovat.
Nehapem tie begin prikazy. Kod si pisal ty? alebo si to stiahol? Myslim, ze tie prikazy ani netreba.
Downto ti zacina cyklus od konca.

aj som si myslel ze tento prikaz mi pospaja tie pismenka dokopy len som ho torsku nepochopil .. ok ok takze namiesto toho programu dam

Kód:

write(vystupni[poradi]);

diky
A trosku som sa s tym pohral a som tam aj dodal ze ak slovo prevratis a dostanes rovnake tak ti to napsie ze to slovo je rovnake tu je zdrojovy kod

Kód:

Program Prevraceni1;

var     delka:integer;
        poradi:integer;
        vstupni:string;
        vystupni:string;
        konec:string;

begin
repeat
  writeln('Zadej vstupní řetězec (max. 255 znaků): ');
  readln(vstupni);
  writeln();
  delka:=length(vstupni);
  for poradi:=1 to delka do
   vystupni[poradi]:=vstupni[delka-poradi+1];
   if vstupni[poradi]=vystupni[poradi] then
     write(vstupni,' -  slovo je rovnake aj ked ho prevratis')
   else
    begin
     write('prevraceny retazec je: ');
     for poradi:=1 to delka do
     write(vystupni[poradi]);
    end;
  writeln();
  writeln();
  writeln('Pre pokracovanie stlac Enter, pre ukoncenie programu napis "konec"');
  readln(konec);
until (konec='konec');
end.

lubosnik · Napísal **lubosnik**: 04.10.2012 20:55

zdravim, kupil som si knihu lebo som sa chcel naucit programovat presne tu istu co tu pisal tento clovek nadomnou http://www.martinus.sk/?uItem=62331 a mam presne ten isty problem co on pretoze z toho co ste tu pisali som to nepochopil a z toho co autor pisal uz vobec nie, on sa k tomuto for poradi:=1 to delka do
begin
vystupni[poradi]:=vstupni[delka-poradi+1];
vystupni:=vystupni+vystupni[poradi]
end;

vyjadril takto: druhy prikaz cycklu for je nutny k tomu, aby se z
jednotlivych znaku postupne stal cely retezec. nic podropbnejsie k tomu nepovedal nevysvetlil ako to prebieha ako pri ostatnych prikazoch. tak teraz kvoli tomuto nemozem pokracovat v citani tej knihy lebo neskor tam s tym pracuje tiez. mohol by mi to prosim vas niekdo podrobnejsie vysvetlit ako M4xovi? prosim neodkazujte ma na ostatne stranky, pozeral som ich a ovela lahsie je to vysvetlene v tej knihe tym veciam na internete nechapem. vopred vdaka za odpoved.

BX · Napísal BX: 04.10.2012 21:34

Neviem z akého braku sa to učíte, ale odhoďte to. Ja vždy odporúčam túto knihu/skriptá (voľne šíriteľné)
http://www.gymparnr.edu.sk/obsah/predme ... pta_tp.pdf

Skús začať odznovu s týmto a takéto otázky mať nebudeš.

lubosnik · Napísal **lubosnik**: 04.10.2012 21:43

Turbo pascal sa pouziva tak isto ako free pascal?

BX · Napísal BX: 04.10.2012 21:56

Áno. Ak už si si prostredie rozbehal a spustil nejaký program (napr. Hello World), tak môžeš robiť v tom. Príkazy sú tam rovnaké.

lubosnik · Napísal **lubosnik**: 06.10.2012 17:57

Ta prirucka Turbo Pascalu je pre mna tazsia ako ta kniha co mam, uz niekde na 18tej strane zadava slovne ulohy ktore nemam sancu vyriesit kdezto zapisat v jazyku, sice ich vyriesi ale na zaciatku psiat ze sa musim kazdu ulohu sam pokusit najprv vyriest...hned prva druha tretia ani jedna neni sance bol by som pri tom styri dni a stale by to bolo zle, nechcem vediet co bude dalej. Tak opakujem: prosim vas nemoze mi niekdo doporucit inu literaturu? Kde sa to vysvetluje ako primitivom? Alebo si mam ozaj rozmyslat nad tym ze sa zaradim do programu testovania silnych nootropik na ludoch(troling)
Prosim poradte bez nejakeho naznaku sarkazmu. Vdaka velmi to ocenujem.

BX · Napísal BX: 06.10.2012 18:16

A čo myslíš, že iní knihu o programovaní len otvoria, prečítajú a vedia? Nie! Tie úlohy sú to najlepšie, čo ti môže kniha dať. Ak ich sám vyriešiš - a trebárs aj za štyri dni - tak ti to dá viac, akoby ti to niekto vysvetlil "ako pre primitíva"

Nečakaj, že ťa kniha naučí programovať. To sa musíš naučiť sám. Príkazy vieš, syntax vieš (z knihy, ak nie, choď ďalej a k úlohám sa vráť) - tak makaj. Tak ako sme aj my niekedy makali

(Tiež som (bývalý) samouk, viem, čo to obnáša)

lubosnik · Napísal **lubosnik**: 06.10.2012 18:29

Tam nejde o to aby som si to precital vela krat co som si precital...ja viacerym veciam v tej prirucke nechapem. Tak preto chcem aby mi niekdo poradil nejaku inu literaturu, tu knihu co mam je ovela lepsia ako ta prirucka len v nej nemozem pokracovat lebo nechapem par vyrazom a stale ich nedokazem pochopit, tam to neni o tom ze som si to nedostatocne krat precital (v tej knihe) tam su veci ktore proste autor nevysvetlil asi cakal ze to clovek sam pochopi no bohuzial ja nie a v tej prirucke je ako som uz vravel podobny pripad, chcel som len poradit inu literaturu..na to som chcel odpovedat, ak mi nedokaze nikdo pomoct tak potom uz nebudem otravovat na fore, videl som forum kde sa o tom rozprava mam problem tak som sa pridal, nic? dobre tak nic, nejdem otravovat.

BX · Napísal BX: 07.10.2012 0:21

Ak máš problém s drobnosťami, tak ich predsa môžme rozobrať tu. Napíš, čomu nechápeš a možno sa to podarí vysvetliť nám, keď už sa to nepodarilo tým, čo písali tie knihy

Ak by existovalo niečo ako "dokonalá kniha", určite by si o nej už vedel.

faraon · Napísal **faraon**: 07.10.2012 10:58

lubosnik píše:

tu knihu co mam je ovela lepsia ako ta prirucka len v nej nemozem pokracovat lebo nechapem par vyrazom a stale ich nedokazem pochopit, tam to neni o tom ze som si to nedostatocne krat precital (v tej knihe) tam su veci ktore proste autor nevysvetlil asi cakal ze to clovek sam pochopi

Tu knihu jsem předevšírem prolistoval, vypadá docela hezky, je v ní dost názorných obrázků, ale jinak mi připadala strašně nepřehledná, s kousíčky kódu místo ukázkových programů, které nebyly od povídání odděleny ani prázným řádkem. Na to že Pascal mám pěkných pár let za sebou jsem se v ní tedy moc nevyznal :-/

Příručka k TP je jenom návod k jazyku, u kterého se zase předpokládá že programování ovládáš, a potřebuješ informace o konkrétních vlastnostech tohoto jazyka a překladače. Není to učebnice programování a nedá se k tomu použít.

Ta skripta odkazovaná výše jsou ale fakt dobrá, sám je občas používám, a pár podobných textů je i online:
http://home.pf.jcu.cz/~edpo/program/program.html
http://pascal.webz.cz/kurs/index.html

Možná bys ale ještě před Pascalem potřeboval zjistit co to vlastně programování je, naučit se věci jako algoritmizace, dekompozice, strukturování a rekurze, a teprve pak se pustit do skutečného programovacího jazyka. Například na Stanford University začínají tímhle: http://karel.oldium.net/

A nebo zkusit přímo skripta pro vysokou školu, která vysvětlují algoritmizaci bez použití konkrétního jazyka, přímo v lidštině: http://www.rudisweb.wz.cz/dokumenty/algoritmizace.pdf

Pascal HELP

Podobné témy