М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
samorukov2005
samorukov2005
17.01.2021 03:18 •  Информатика

[delphi] - 99 заданы матрица порядка n и число k. разделить элементы k-й строки на диагональный элемент, расположенный в этой строке.

👇
Ответ:
koshechkaXL
koshechkaXL
17.01.2021
Консольное приложение:
const n=4;
var a:array[1..n,1..n] of real;
k,i,j:integer;
begin
writeln('1:');
for i:=1 to n do
 begin
 for j:=1 to n do
  begin
  a[i,j]:=10*random;
  write(a[i,j]:4:1);
  end;
 writeln;
 end;
write('k = ');
readln(k);
writeln('2:');
for j:=1 to n do a[k,j]:=a[k,j]/a[k,k];
for i:=1 to n do
 begin
 for j:=1 to n do write(a[i,j]:4:1);
 writeln;
 end;
end.

Пример: 1:
 1.4 0.8 5.3 9.6
6.7 2.4 5.1 4.0
1.9 6.6 0.9 4.0
4.1 6.1 2.6 0.9
k = 2
2:
1.4 0.8 5.3 9.6
2.8 1.0 5.1 4.0
1.9 6.6 0.9 4.0
4.1 6.1 2.6 0.9
4,6(31 оценок)
Ответ:
Venjin
Venjin
17.01.2021
{$APPTYPE CONSOLE}
Var
   Mass:array[1..10000,1..10000] of real;
   n,k,i,j:integer;
Begin
Randomize;
Write('n = ');ReadLn(n);
For i:= 1 to n do
    Begin
    For j:= 1 to n do
        Begin
        Mass[i,j]:=random*21-10;
        Write(Mass[i,j]:5:2,' ')
        End;
    WriteLn
    End;
Write('k = ');ReadLn(k);
For j:= 1 to n do
    Mass[k,j]:=Mass[k,j]/Mass[k,k];
For i:= 1 to n do
    Begin
    For j:= 1 to n do
        Write(Mass[i,j]:5:2,' ');
    WriteLn
    End;
ReadLn
End.
4,7(13 оценок)
Открыть все ответы
Ответ:
brilovainna
brilovainna
17.01.2021

Введение

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

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

вот так вот

В компьютерном жаргоне часто используется слово «софт» от английского software.

Ну думаю знаете

По назначению программное обеспечение разделяется на системное, прикладное и инструментальное.

Если еще подробнее пишите в лс

4,5(74 оценок)
Ответ:
4okoladka100
4okoladka100
17.01.2021

Введение

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

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

В компьютерном жаргоне часто используется слово «софт» от английского software.

По назначению программное обеспечение разделяется на системное, прикладное и инструментальное.

Вообще это неполная инфа, если надо напишите в лс. Я скину

4,5(51 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ