Заполнить матрицу 3 х 3 случайными числами из интервала [0…

Question

Заполнить матрицу 3 х 3 случайными числами из интервала [0… 10] и вторую матрицу 3 х 3 из интервала [0… 5], перемножитьтаблицы

Answer 1

66

gregor777

31 марта 2023

program dl9_Alina73; var a: array [1… 3,1… 3] of real; b: array [1… 3,1… 3] of real; c: array [1… 3,1… 3] of real; i,q: integer; beginRandomize; for i: =1 to 3 do beginfor q: =1 to 3 do begina[i,q]: =Random (10) end end; for i: =1 to 3 do beginfor q: =1 to 3 do beginb[i,q]: =Random (5); end end; for i: =1 to 3 do beginwriteln; for q: =1 to 3 do beginc[i,q]: =a[i,q]*b[i,q]; write (c[i,q]) end end; readlnend.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: