Witam.
Zastanawiałem się, jak to wykonać, ale nie udało mi się.
Mam program w PASCALU, który musi wczytać N liczb. N jest niewiadome i program musi wiedzieć, ile tych liczb jest. Mam działający kod:
Readln(losowania);
for i:= 1 to losowania do
begin
Readln(podane);
polaskreslen:=1; q:=1;
repeat
repeat begin insert(podane[q], temp, 0); q:=q+1; end; until ((podane[q]=' ')or(q>length(podane)));
for e:=1 to length(temp) do insert(temp[e], temp2, 0);
val(temp2, z, t); temp2:=''; temp:='';
skreslenia[i,polaskreslen]:=z;polaskreslen:=polaskreslen+1; q:=q+1;
if max<polaskreslen then max:=polaskreslen;
until q>length(podane);
end;
Mój problem polega na tym, że w linii 7 liczby zapisują się do temp, ale kiedy podaje 54 zapisuje się w odwrotnej kolejności, jako 45. W linii 8 odwracam tą kolejność i wszystko działa, ale... zależy mi na optymalizacji kodu. Czy zna ktoś sposób, w jaki można by się pozbyć tej dodatkowej pętli, która zamienia kolejność?
Dziękuje za pomoc
Pozdrawiam
Martodox