Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- begin;
- case UserWayOfInput = 2: begin;
- InputNumberOfLines();
- InputNumberOfColumns();
- Matrix = inputMatrixFromConsole(Matrix, NumberOfLines, NumberOfColumns);
- end;
- end;
- case UserWayOfInputOfInput = 2:
- Path = InputPathToFile();
- reveiveNumberOfLinesFromFile(Path);
- reveiveNumberOfColumnsFromFile(Path);
- Matrix = reveiveMatrixFromFile(Path, NumberOfLines,
- NumberOfColumns, Matrix);
- end;
- RecieveMatrix := Matrix;
- end;
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement