fertorres 13.04.07, 18:35 W danych wyjściowych mam trzy liczby oddzielone spacjami, jak mogę np. pierwszą liczbę przyporządkować pierwszej zmiennej. drugą - drugiej, trzecią - trzeciej? Odpowiedz Link Obserwuj wątek Podgląd Opublikuj
negevmc Re: Oddzielone spacjami [Pascal] 16.04.07, 21:33 fertorres napisał: > W danych wyjściowych mam trzy liczby oddzielone spacjami, jak mogę np. > pierwszą liczbę przyporządkować pierwszej zmiennej. drugą - drugiej, trzecią - > trzeciej? jedeno z miliona rozwiązań - wcale nie najelegantsze powiedzmy, że w zmiennej Input typu string masz te 3 liczby "rozdzielone" liczby będą w tablicy aInput. var aInput: array[0..2] of extended; iPos: intger; i: integer; begin Input := Input + ' '; for i := 0 to 2 do begin iPos := Pos( ' ', Input ); aInput[i] := StrToFloat( Copy( Input, 1, iPos ); Input := Copy( Input, iPos + 1, Length( Input ) ); end; Pozdrawiam Odpowiedz Link