Алгоритм с вводом и выводом данных (графический) пример из жизни

для элементов которой определены операции сложения, вычитания, умножения и деления (кроме деления на нуль), причём свойства этих операций близки к свойствам обычных числовых операций. Простейшим полем является поле рациональных чисел (дробей). Хотя названия операций поля взяты из арифметики, следует иметь в виду, что элементы поля не обязательно являются числами, и определения операций могут быть далеки от арифметических.

Поле — основной предмет изучения теории полей. Рациональные, вещественные, комплексные числа, вычеты по модулю заданного простого числа образуют поля[

рамках понятия о поле неявно работал ещё Галуа в 1830 году, с использованием идеи алгебраического расширения поля ему удалось найти необходимое и достаточное условие того, чтобы уравнение от одной переменной можно было решить в радикалах. Позднее при теории Галуа была доказана невозможность решения таких классических задач, как квадратура круга, трисекция угла и удвоение куба. Явное введение понятия поля относят к Дедекинду (изначально под названием «рациональная область», термин «поле» введён в 1871 году). Будучи наиболее близким из всех общеалгебраических абстракций к обычным числам, поле используется влинейной алгебре как структура, универсализирующая понятие скаляра, и основная структура линейной алгебры — линейное пространство — определяется как конструкция над произвольным полем. Также теория полей в значительной степени составляет инструментальную основу таких разделов, как алгебраическая геометрия иалгебраическая теория чисел.

Const m=5;
var 
a:array[1..m,1..m] of integer;
i,j:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to m do
 begin
 for j:=1 to m do
  begin
  a[i,j]:=random(100);
  write(a[i,j]:4);
  end;
 writeln;
 end;
for i:=2 to m do
 for j:=1 to i-1 do
   a[i,j]:=0; 
writeln('Полученный массив:');
for i:=1 to m do
 begin
 for j:=1 to m do write(a[i,j]:4);
 writeln;
 end;
end.

Пример:
Исходный массив:
  12  76  20  65  71
  27  52  36  45  52
   9  69   8  69  46
  89  69  52  76  31
  71  25   7  62  89
Полученный массив:
  12  76  20  65  71
   0  52  36  45  52
   0   0   8  69  46
   0   0   0  76  31
   0   0   0   0  89