hladam doucovatela

Programovacie jazyky, rady, poradňa...
call88
Novice
Novice
Príspevky: 6
Registrovaný: 21 apr 2009, 18:42

hladam doucovatela

Príspevok od používateľa call88 »

Dobry den hladam doucovatela na programovanie v pascale ,aj zaplatim za hodiny .ja som z trnavy . dakujem. [email protected]
BX
Addict
Addict
Používateľov profilový obrázok
Príspevky: 4572
Registrovaný: 10 jan 2008, 15:30

Príspevok od používateľa BX »

S dobrimi zdrojmi sa to musi naucit aj uplny debil...
Ak nemas zdroje, napis viac (co nevies apod.) poradime... :)
juho
Star
Star
Používateľov profilový obrázok
Príspevky: 551
Registrovaný: 11 máj 2007, 21:16

Príspevok od používateľa juho »

no uz neviem kolkykrat ten kurz davam sem na forum ale tak: http://mojeskola.cz/Vyuka/Php/Kurzy/kurz_pascal.php
je to v url Hojko komko
call88
Novice
Novice
Príspevky: 6
Registrovaný: 21 apr 2009, 18:42

Príspevok od používateľa call88 »

Pani dostal som ulohu a newiem si snou nejako rady. nepomohli by ste mi ?
Zrealizujte rekurzívne aj nerekurzívne riešenie (ak sa dá) programu, ktorý zabezpečí pomocou rekurzívnej procedúry (funkcie) pri vstupe čísla n, znakoch a a c výpis n-krát znaku a a potom znak c.
audiotrack
VIP
VIP
Používateľov profilový obrázok
Príspevky: 25958
Registrovaný: 09 sep 2005, 18:39
Kontaktovať používateľa:

Príspevok od používateľa audiotrack »

rekurzívne asi nejak takto:

Kód: Vybrať všetko

procedure vypis(n:integer)
begin
   if( n > 0) then begin
      write('a');
      vypis(n-1);
   end;
   write('c');
end;

nerekurzívne:

Kód: Vybrať všetko

procedure vypis(n:integer)
var i:integer;
begin
    for i:=1 to n do write('a');
    for i:=1 to n do write('c');
end;
call88
Novice
Novice
Príspevky: 6
Registrovaný: 21 apr 2009, 18:42

Príspevok od používateľa call88 »

Dakujem !!!!!
Napísať odpoveď