Explode in php = ???? in turbo pascal

Kaip explodint duomenis ant pascalio taip pat kaip php?

Reikia išskirt skaitmenis iš skaičiaus... T.y. sakykim yra kintamasis a = 57, kaip isgaut skaitmenis 5 ir 7?

sk1 := t mod 10;
sk2 := t div 10;

Aišku čia tik dviženkliams skaičiams tinka, tačiau galima parašyti nedidelę funkciją, kur skaičiaus skaitmenis visus tarkim į masyvą įrašo panašiu principu.

Edit: Pamačiau, kad ant Turbo Pascal tau reikia. Čia ant Pascalio paprasto taip, o kaip ant Turbo, tai nežinau. Visai juo nesidomėjau.

Ant turbo taip pat.

teks dalinti iš 10 (žiūrėti liekaną) norint sužinoti paskutini skaitmeni ir t.t.

Dar galima su ciklu while ar for bet neatsimenu kaip

Tai manau, kad Turbo Pascalis ir tas kitas Pascalis yra tik paskalio rašymo programos :S

Tai manau, kad Turbo Pascalis ir tas kitas Pascalis yra tik paskalio rašymo programos :S

Na, bet vistiek kažkaip savitai kompiliuoja. Kažkoks tikrai yra skirtumas tarp Turbo Pascal ir Free Pascal kompiliatorių.

Na, gal ir jokio nėra, tikrai nežinau, nes naudojuosi tik FPS, o Turbo Pascal nesu nei matęs, nei čiupinėjęs. :)

sk1 := t mod 10;
sk2 := t div 10;

 

Aišku čia tik dviženkliams skaičiams tinka, tačiau galima parašyti nedidelę funkciją, kur skaičiaus skaitmenis visus tarkim į masyvą įrašo panašiu principu.

 

Edit: Pamačiau, kad ant Turbo Pascal tau reikia. Čia ant Pascalio paprasto taip, o kaip ant Turbo, tai nežinau. Visai juo nesidomėjau.

Hmm.. Paprasčiausia logika. Gal ir būčiau sugalvojęs, jei bučiau šį savaitgalį protingesnis buvęs...

Ačiū labai. :)

Beje, pats nelabai nusimanau, tačiau Pascal manau yra programavimo kalba, o Turbo Pascal yra jai rašyt skirtas įrankis, todėl reikėjo man rašyt Pascal... My bad. :D

Hmm.. Paprasčiausia logika. Gal ir būčiau sugalvojęs, jei bučiau šį savaitgalį protingesnis buvęs...

Ačiū labai. :)

Beje, pats nelabai nusimanau, tačiau Pascal manau yra programavimo kalba, o Turbo Pascal yra jai rašyt skirtas įrankis, todėl reikėjo man rašyt Pascal... My bad. :D

Pradžioj buvo pascal,po to turbo,po to free, čia kitaip tariant "versijos" skirtumų didelių nėra, ten biški dėl rėžių ir kai kuriu funkcijų ner senesniuose versijose

Pradžioj buvo pascal,po to turbo,po to free, čia kitaip tariant "versijos" skirtumų didelių nėra, ten biški dėl rėžių ir kai kuriu funkcijų ner senesniuose versijose

Aišku... :)

Turbo skirtas senesniems kompams, jis buvo seniau sukurtas, o free labiau dabartiniams skirtas...