Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.02.2013, 17:31
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию Delphi, ООП в консоле, объясните, как надо правильно делать

Класс для представления матриц целых чисел. Размер матрицы произволен. Реализовать операции над матрицами: сложение, умножение матрицы на скаляр, транспонирование, вычисление определителя (в случае, если это возможно).
Ответить с цитированием
  #2  
Старый 24.02.2013, 00:16
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,087
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Цитата:
Сообщение от Sevi4_by
Класс для представления матриц целых чисел. Размер матрицы произволен. Реализовать операции над матрицами: сложение, умножение матрицы на скаляр, транспонирование, вычисление определителя (в случае, если это возможно).

Ну и в чем проблема. ООП никак не связано с типом интерфейса. Тебе просто надо, желательно в отдельном модуле, создать класс, поддерживающий/реализуюший то, что от тебя требуют. Ну а в консоли просто использовать этот класс.

Код:
unit MyMatrixClass;

interface

type
  TMyMatrixClass = class
  private
  ..
  public
    ...
    property Values[I : Integer; J : Integer] : Integer read Get write Set;
    ...
  end;

implementation

  ...

end.
Ответить с цитированием
Этот пользователь сказал Спасибо lmikle за это полезное сообщение:
OTVET (27.02.2013)
  #3  
Старый 24.02.2013, 00:36
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

Я прописал все процедуры, но не понимаю как вывести в консоль матрицу
Ответить с цитированием
  #4  
Старый 24.02.2013, 04:15
Аватар для angvelem
angvelem angvelem вне форума
.
 
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
По умолчанию

Как всегда используя Write/WriteLn.
__________________
Je venus de nulle part
55.026263 с.ш., 73.397636 в.д.
Ответить с цитированием
  #5  
Старый 24.02.2013, 14:51
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию у меня есть вот такое соображение, для вывода матрицы:

Код:
var 
mas: array [0..n] of integer;
i,j: mas;
begin
for i:=0 to i<n do
inc(i);
writeln();
gor j:=0 to j<m do
inc(j);
writeln(mas[i][j]);
end.
MAD: Учимся правильно оформлять код!

Последний раз редактировалось M.A.D.M.A.N., 24.02.2013 в 18:42.
Ответить с цитированием
  #6  
Старый 24.02.2013, 14:57
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо NumLock за это полезное сообщение:
OTVET (27.02.2013), Sevi4_by (24.02.2013)
  #7  
Старый 24.02.2013, 15:07
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

должна быть матрица произвольная и размер должен вводиться с клавиатуры, в в этом загвоздка
Ответить с цитированием
  #8  
Старый 24.02.2013, 15:20
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо NumLock за это полезное сообщение:
OTVET (27.02.2013), Sevi4_by (24.02.2013)
  #9  
Старый 24.02.2013, 15:23
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

Огромное спасибо! Вы лучший
Ответить с цитированием
  #10  
Старый 24.02.2013, 16:15
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

Подскажите, как правильно оформить меню, в этом проекте?
Т.е. программа запускается, я вывожу матрицу и мне надо выбрать действия, которые нужно с ней сделать, как это будет выглядеть?
Понимаю, что уже надоел, но дело срочное очень
Ответить с цитированием
  #11  
Старый 24.02.2013, 17:03
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

запрашивай номер действия через Readln
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
  #12  
Старый 24.02.2013, 17:10
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

Т.е. Я прописываю команды в модуле, а в главной программе просто вызываю их через readln?
Ответить с цитированием
  #13  
Старый 24.02.2013, 17:21
Аватар для NumLock
NumLock NumLock вне форума
Let Me Show You
 
Регистрация: 30.04.2010
Адрес: Северодвинск
Сообщения: 5,426
Версия Delphi: 7, XE5
Репутация: 59586
По умолчанию

Код:
  Writeln('1 - add');
  Writeln('2 - mul');
  Writeln('3 - transp');
  Writeln('4 - calc determ');
  Write('Enter func num:');
  Readln(op);
  case op of
    0: begin
      // сложение
    end;
    1: begin
      // умножение
    end;
    2: begin
      // транспонирование
    end;
    3: begin
     // вычисление определителя
    end;
  end;
__________________
Пишу программы за еду.
__________________
Ответить с цитированием
Эти 2 пользователя(ей) сказали Спасибо NumLock за это полезное сообщение:
OTVET (27.02.2013), Sevi4_by (24.02.2013)
  #14  
Старый 24.02.2013, 18:14
Sevi4_by Sevi4_by вне форума
Прохожий
 
Регистрация: 23.02.2013
Сообщения: 16
Репутация: 10
По умолчанию

Тут должен быть один класс для выполнения действий? Например TMatrix и в нем должны быть прописаны мои действия с ней?

Последний раз редактировалось Sevi4_by, 25.02.2013 в 17:16.
Ответить с цитированием
  #15  
Старый 01.03.2013, 09:50
Аватар для Thrasher
Thrasher Thrasher вне форума
Illuminati
 
Регистрация: 06.03.2008
Адрес: Крым, г. Симферополь
Сообщения: 348
Репутация: 8808
По умолчанию

Очень древняя книга, но в ней хорошо описано как делать консольные приложения. Ну и всякое такое тоже интересно посмотреть.
__________________
Хорошо написанная программа не требует документации
ICQ 9-184-668.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 09:23.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025