Информатика, опубликовано 27.01.2019 05:00
Заполнить матрицу 3х3 случайными числами из интервала [0..10] и вторую матрицу 3х3 из интервала [0..5],перемножить таблицы
Ответ оставил: Гость
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;
begin
randomize; for i: =1 to 3 do begin
for q: =1 to 3 do begin
a[i,q]: =random(10)
end end;
for i: =1 to 3 do begin
for q: =1 to 3 do begin
b[i,q]: =random(5);
end end;
for i: =1 to 3 do begin
writeln;
for q: =1 to 3 do begin
c[i,q]: =a[i,q]*b[i,q];
write (c[i,q])
end end;
readln
end.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01