Pascal - While

Querry · Napísal **Querry**: 28.02.2013 17:32

Zdravim, potreboval by som poradit s while cyklom,

mam for cyklus ktory sa 10x zopakuje, pri kazdom opakovani ma nacitat vstup postupne po pismenach a dalej s nim pracovat. Na prvy pokus vsetko funguje, problem nastane ked sa zacne druhe opakovanie for cyklu, vtedy vyhodonoti Eoln ako true a nevykona to co ma, preskoci cely while cyklus. Co s tym spravit aby to zakazdym nacitalo vstup vo while cykle?

Kód:

for i:= 1 to 10 do
begin

    while not Eoln do
    begin
      read(ch);
    ...
    end;
...

Budem vdacny za kazdu radu

F3RY · Napísal **F3RY**: 28.02.2013 23:17

Preco si sem nedal cely kod? Predpokladam, ze vstup nacitavas z nejakeho suboru. Ak ano, zabudol si dat smernik na Eoln. -> Eoln(subor)

expoox · Napísal **expoox**: 09.03.2013 16:51

nebude jednoduchsie citat string a nie char ? vtedy tam ani nemusis mat while

faraon · Napísal **faraon**: 09.03.2013 17:50

Třeba takhle by to nešlo?

Kód:

for i:= 1 to 10 do
begin

    while not Eoln do
    begin
      read(ch);
    ...
    end;
    readln;
...

Pascal - While

Podobné témy