С помощью функции sin сформировать и вывести матрицу 6x6 из вещественных положительных чисел в пределах от 0-15.Определить наибольший элемент её главной диагонали и его индексы.Сформировать и вывести матрицу все элементы которой равны соответствующим элементам исходной,деленным на наибольший элемент диагонали.
"С помощью функции sin" означает, что нужно организовать цикл от 0 до 15 с шагом 0,4 {(((0+15)/(∆x))+1=36, отсюда ∆x=0,4)}, а потом из полученных значений x, получить 36 значений - sin (x), и сформировать из них матрицу 6x6.
Вот на что меня хватило:
Program massiv;
Uses
crt;
const
n=6;
type
tar=array[1..n, 1..n] of real;
var
a, b, c: tar;
i, j: integer;
x: real;
begin
clrscr;
writeln('Ishodniy massiv:');
x:=0;
repeat x:=x+1;
for i:=1 to n do
for j:=1 to n do
a[i, j]:=sin (x);
write(' ',a[i, j]:5:2);
until x=36;
readln;
end.
| Замечание: |
 Так. Предупреждаю, причем ОДИН РАЗ: распихивание дубликатов по разделам (красспостинг) у нас наказуется БАНОМ.
Дубликат удалён.
Модератор |