створіть проект для розв'язання задачі.знайти найбільший елемент та його індекси у двовимірному масиві[1..3,1..6].​

Pascal

const

 nmax = 100;

var

 A: array[1..nmax, 1..nmax] of real;

 i, j, n, count: byte;

begin

 Writeln('Введите N');

 Readln(n);

 Writeln('Исходная матрица');

 count:=0;

 for i := 1 to N do

 begin

   for j := 1 to N do

   begin

     a[i, j] := (Sin(Sqr(i) - Sqr(j)) / N);

     write(A[i, j]:10:3);

     if a[i,j]> 0 then Inc(count);

   end;

   writeln;

 end;

 Writeln('Количество положительных элементов: ', count);

end.

Тестовое решение

Введите N

5

Исходная матрица

    0.000    -0.028    -0.198    -0.130     0.181

    0.028     0.000     0.192     0.107    -0.167

    0.198    -0.192     0.000    -0.131     0.058

    0.130    -0.107     0.131     0.000    -0.082

   -0.181     0.167    -0.058     0.082     0.000

Количество положительных элементов: 10

1) 6,77 мм (для стран Таможенного союза)

2) 6,35 мм (для программ компьютерной вёстки)

Объяснение:

Что такое pt? pt - это типографский пункт, единица измерения кегля шрифта.

Во входящих в Таможенный союз странах СНГ пункт исчисляется по типометрической системе Дидо, в которой 1 пункт равен 0,376 мм.

В программах компьютерной вёрстки широко используется введённый компанией Adobe пункт, приравненный к 1/72 дюйма, то есть  0,3528 мм.

Т.е. из-за нечеткой формулировки вопроса, у вас будет два ответа:

1) 18*0,376 ≈ 6,77 мм (для стран Таможенного союза)

2) 18*0,3528 ≈ 6,35 мм (для программ компьютерной вёстки)