Есть ответ 👍

ОТВЕТИ ПРАВИЛЬНО! ИНФОРМАТИКА! У МЕНЯ ФОТО!

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

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

pron1983
4,5(98 оценок)

Function read(file: string, size: integer): array[1..1000,1..1000] of integer; var t : text; var i, j : integer; var a: array[1..1000, 1..1000] of integer; begin   assign(t, path); reset(t);   for i : = 1 to size do begin     for j : = 1 to size do read(t, a[i,j]);     readln(); end;   read: = a; end.

Популярно: Информатика