, мне нужно скопировать это и вставить в ВОРД а не фоткай, кто можешь скинуть
Л/Р 3 информатика
Лабораторная работа №3
Тема: Создание и форматирование таблиц в документе MSWord.
Цель:Изучениетехнологии создания и форматирования таблиц в MSWord.
Оборудование: ПК, MSWord 2007.

112

219

Посмотреть ответы 1

Ответы на вопрос:

elbrosso

Информатика

4,6(45 оценок)

Program asd; uses crt; const n=3; const m=3; var a,b,c: array [1..n, 1..m] of integer; i,j,k: integer; s: integer; begin writeln('a: '); for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(n); write(' ',a[i,j]); end; writeln; end; writeln('b: '); for i: =1 to n do begin for j: =1 to m do begin b[i,j]: =random(n); write(' ',b[i,j]); end; writeln; end; for i : = 1 to n do begin for j : = 1 to m do begin s: = 0; for k: =1 to n do s: = s + a[i,k] * b[k,j]; c[i, j] : = s; end; end; writeln ('c: '); for i : = 1 to n do begin for j : = 1 to m do begin write (' ',c[i, j] ); end; writeln; end; readln; end.