| | |
| Stránka: 1 z 1
| [ Príspevkov: 9 ] | |
Autor | Správa |
---|
Registrovaný: 12.03.07 Prihlásený: 13.03.07 Príspevky: 5 Témy: 1 Bydlisko: Močenok |
potreboval by som helpnut s jednym prikladom, teda tych prikladov je viac ale staci tento jeden ak by niekto mal cas mohli by ste sa na to plz pozriet?
Zostavte program ktory pre zadane slovo z klavesnice
a) vypise toto slovo v prvom riadku, pricom kazde pismeno slova bude inou farbou
b) dané slovo potom vypíše v druhom riadku a v druhom stlpci, v tretom riadku a tretom stlpci atd.. pocet riadkov sa bude rovnat poctu pismen v retazci
SLOVO
_SLOVO
__SLOVO
___SLOVO
____SLOVO
c)dane slovo vypise v druhom riadku od druheho pismena, v tretom od tretieho
SLOVO
LOVO
OVO
VO
O
thx dopredu
|
|
Registrovaný: 17.11.06 Prihlásený: 31.12.07 Príspevky: 677 Témy: 9 |
Kód: program slovo; uses CRT; var I,J:integer; retazec:string; begin clrscr; writeln('Zadaj svoje slovo'); readln(retazec); writeln; writeln; For I:=1 to length(retazec) do begin textcolor(I+10); write(retazec[I]); end;
writeln; writeln; textcolor(11); for I:=1 to length(retazec) do begin for J:=1 to I do write(' '); writeln(retazec); end;
writeln; writeln; for I:=1 to length(retazec) do begin for J:=I to length(retazec) do write(retazec[J]); writeln; end;
repeat until keypressed; end.
v tej druhej časti si znovu potrebujem nastaviť farbu na čiernu aby som nepísal farebne ako som mal poslednú farbu v prvej časti programu. Tak tento riadok: textcolor(11); si zmeň. Namiesto 11 tam daj číslo aké reprezentuje bielu farbu, ja ju z pamäti neviem tak som tam dal jedenástku.
|
|
Registrovaný: 12.03.07 Prihlásený: 13.03.07 Príspevky: 5 Témy: 1 Bydlisko: Močenok | Napísal autor témy radiatorr: 13.03.2007 15:39 | |
|
no to druhe textcolor tam ani nemusi byt, lebo to prve mas zadefinovane pre ten prvy begin a end.. dakujem, vazne si mi velmi pomohol.. mozem sa ta spytat kde si sa naucil takto programovat? mna programovanie bavi, teda viacmenej, len niekedy neviem prist na to ako by mal ten program vyzerat v pascale.. zapisat by som to potom uz vedel keby viem ako na to.. naucil si sa takto programovat sam alebo z nejakej odbornej literatury?
|
|
Registrovaný: 17.11.06 Prihlásený: 31.12.07 Príspevky: 677 Témy: 9 |
sám z odbornej literatúry
|
|
Registrovaný: 12.03.07 Prihlásený: 13.03.07 Príspevky: 5 Témy: 1 Bydlisko: Močenok | Napísal autor témy radiatorr: 13.03.2007 17:21 | |
|
a mohol by si mi prezradit co to bolo za knihu? alebo nemas pre mna nejaky typ na knihu? ja sa to chcem vazne naucit len na nete som toho moc o programovani v pascale nenasiel.. mozno je to moj problem ze chcem vsetko rychlo.. pascal ovladam, ale co sa tyka tych veci co robime teraz na infe uz zacinam stracat prehlad.. vies 3 roky sme mali profesora s ktorym sme brali vykreslovanie hviezdiciek a podobe blbosti ktore boli uplne lahke a teraz prisla nova profesorka ktorej niekedy ani nerozumiem co hovori a ja mam z toho maturovat..
|
|
Registrovaný: 17.11.06 Prihlásený: 31.12.07 Príspevky: 677 Témy: 9 |
1) tri roky? preboha, to programuješ v pascale dlhšie ako ja.. ja som sa asi po roku začal venovať delphi, teraz v súčasnosti céčko a php
2) myslíš že sa to dá naučiť z jednej knihy? bolo ich podstatne viac
3) by som ti dal linky na fora o programovaní, len neviem či sa to tu smie . Tam sa tiež vela naučíš.. a potom len skúšať, skúšať a skúšať. Nestačí teória, treba aj prax
|
|
Registrovaný: 12.03.07 Prihlásený: 13.03.07 Príspevky: 5 Témy: 1 Bydlisko: Močenok | Napísal autor témy radiatorr: 13.03.2007 17:30 | |
|
1) Tie tri roky vyzerali asi takto - prisiel som do skoly na info, spravili sme si primitivny priklad, odisiel som a pascal som potom zase nevidel az do dalsej hodiny informatiky
2) ja viem ze to nejde z jednej knihy, ale nejako treba zacat... aj ty si musel nejakou knihou zacat
3) tie linky ak mas cas by si mi plz mohol poslat sukromnou spravou, alebo mozes aj na icq.. budem ti za to velmi vdacny.. teraz som som doma chory tak mam aj dost casu zacat skusat skusat skusat a skusat
|
|
Registrovaný: 17.11.06 Prihlásený: 31.12.07 Príspevky: 677 Témy: 9 | |
Registrovaný: 12.03.07 Prihlásený: 13.03.07 Príspevky: 5 Témy: 1 Bydlisko: Močenok | Napísal autor témy radiatorr: 13.03.2007 17:45 | |
|
ooo diki.. mas to u mna.. sice neviem ako ti to splatim ale dik
|
|
| Stránka: 1 z 1
| [ Príspevkov: 9 ] | |
Podobné témy | Témy | Odpovede | Zobrazenia | Posledný príspevok |
---|
| Pomoc s prikladom v Assembler, C, C++, Pascal, Java | 2 | 689 | 04.04.2007 10:08 palo89 | | Pomoc s prikladom z M v Vzdelanie, štúdium, škola | 7 | 901 | 13.05.2008 16:58 pepek.namornik | | pomoc s jednym prikladom v pascale v Assembler, C, C++, Pascal, Java | 10 | 822 | 18.03.2007 13:22 audiotrack | | pomoc s jednym prikladom v Pascale(grafika) v Assembler, C, C++, Pascal, Java | 3 | 666 | 27.03.2007 22:37 audiotrack | | LG M228WA-BZ 22'', Wide help help v Monitory, televízory a projektory | 1 | 1164 | 05.12.2007 12:41 OmeGa | | help AMD Sempron 2800+ frekvencia 1700 help v AMD - Advanced Micro Devices | 16 | 1740 | 10.03.2007 9:13 dr.etker | | Help v Ovládače | 9 | 336 | 24.12.2012 16:19 ruksak | | help v Elektronika | 1 | 776 | 03.08.2008 14:56 shiro | | HElp v ATI/AMD grafické karty | 1 | 423 | 11.01.2011 16:30 Ďuri | | Help v ATI/AMD grafické karty | 0 | 262 | 26.11.2012 10:19 neron | | help v Ostatné programy | 2 | 651 | 28.02.2009 11:26 eminem | | Help v Audio programy | 3 | 900 | 05.02.2008 22:54 shiro | | help v Pamäte | 11 | 882 | 24.01.2008 16:15 Ingenium Deerro | | HELP!!!! v Zvuk | 0 | 718 | 28.10.2007 13:02 M@iky | | Help :) v PC zostavy | 19 | 904 | 22.01.2010 15:00 MatkoKlingac29 | | Help.... v Antivíry a antispywary | 12 | 453 | 20.11.2012 20:06 personal compuper |
| Nemôžete zakladať nové témy v tomto fóre Nemôžete odpovedať na témy v tomto fóre Nemôžete upravovať svoje príspevky v tomto fóre Nemôžete mazať svoje príspevky v tomto fóre
|
|