[mfek00]

#naukaprogramowania #nieprogramowanie #pascal ( ͡° ͜ʖ ͡°)

Dzień dobry Mircy i Mirabelki, mam nadzieję że pomożecie nołnejmowej pomarańczce. Otóż mam na zaliczenie przedmiotu na studbaza napisać projekt w Pascalu (środowisko Lazarus) o następującej treści zadania:


I tu następuje problem, w tym linku przesłałem mój początkowy kod. Proszę mi powiedzieć czemu wykonuje się w nieskończoność pomimo tego że w pliku wejściowym są tylko 3 linijki tekstu?

[m.....v]

@mfek00: Pascala ruszałem ostatni raz milion lat temu, więc nie pomogę. Ale jestem ciekaw na jakiej uczelni używa się narzędzi, których chyba nikt (zawodowo) już nie używa?

[moon_bluebird]

@macabrankov: rzadko ale jeszcze część przedsiębiorstw używa, w szczególności amerykańskich

[d.....n]

@macabrankov: np. Politechnika Rzeszowska (✌ ﾟ ∀ ﾟ)☞

@mfek00: http://pastebin.com/aAFPbxk0 <- ten kod zlicza wszystkie u w pliku

[mfek00]

@drakkein: Kolejne pytanko mistrzu Pascala i nauk wszelakich. Jak można zakodować znak 'ó' lub 'Ó'.

else (linia[i] in [chr(211), chr(243)]) then inc(o);

jakoś się nie kompiluje

[d.....n]

@mfek00:

if ((linia[i] = chr(211)) or (linia[i] = chr(243))) then