Определить, является ли заданная квадратная матрица n-ого порядка ортонормированной, т.е. такой, в которой скалярное произведение каждой пары строк равно нулю, а скалярное произведение каждой строки на себя равно 1. Матрица 4 порядка.
- Программирование
Условие:
Определить, является ли заданная квадратная матрица n-ого порядка ортонормированной, т.е. такой, в которой скалярное произведение каждой пары строк равно нулю, а скалярное произведение каждой строки на себя равно 1.
Матрица 4 порядка.
Решение:
Листинг программы.
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Grids, StdCtrls;
type
TForm1 = class(TForm)
Label1: TLabel;
Edit1: TEdit;
Button1: TButton;
StringGrid1: TStringGrid;
Label2: TLabel;
Button2: TButton;
Label3: TLabel;
procedure StringGrid1KeyPress(Sender: TObject; var Key: Char);
procedure Edit1KeyPress(Sender: TObject; var Key: Char);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
function pr_pari: boolean;
function samo_na_sebya: boolean;
{ Private declarations }
public
{ Public declarations }
...
Похожие задачи
Не нашел нужную задачу?
Воспользуйся поиском
AI помощники
Выбери предмет
- Правоохранительные органы
- Пожарная безопасность
- Парикмахерское искусство
- Природообустройство и водопользование
- Почвоведение
- Приборостроение и оптотехника
- Промышленный маркетинг и менеджмент
- Производственный маркетинг и менеджмент
- Процессы и аппараты
- Программирование
- Право и юриспруденция
- Психология
- Политология
- Педагогика
- Трудовое право
- Теория государства и права (ТГП)
- Таможенное право
- Теория игр
- Теория вероятностей
- Теоретическая механика
- Теория управления
- Технология продовольственных продуктов и товаров
- Технологические машины и оборудование
- Теплоэнергетика и теплотехника
- Туризм
- Товароведение
- Таможенное дело
- Торговое дело
- Теория машин и механизмов
- Транспортные средства