Dodaj do ulubionych

Oddzielone spacjami [Pascal]

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?
Obserwuj wątek
    • 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

Nie masz jeszcze konta? Zarejestruj się


Nakarm Pajacyka