Наиля Уразова
Наиля Уразова | Репутация: 0 (Без голоса) 16 декабря 2015 в 18:28
Представление информации в ЭВМ
Тема: Интернет-технологии
Поделиться | 
Швейноглы МАЙОР
Швейноглы МАЙОР | Репутация: 30 (Без статуса) 19 декабря 2015 в 10:43

program gachi;
uses crt;
var a: array [1..10,1..10] of real;
i, j, n, m , kmax , lmax: integer;
max :real;
begin
clrscr;
writeln('Введите n<=10 , m<=10');
readln(n,m);
writeln('Введите элементы массива по строкам');
for i:=1 to n do BEGIN
WRITELN;
for j:=1 to m do begin
a[i,j]:=random(10

Швейноглы МАЙОР
Швейноглы МАЙОР | Репутация: 30 (Без статуса) 19 декабря 2015 в 10:43

program gachi;
uses crt;
var a: array [1..10,1..10] of real;
i, j, n, m , kmax , lmax: integer;
max :real;
begin
clrscr;
writeln('Введите n<=10 , m<=10');
readln(n,m);
writeln('Введите элементы массива по строкам');
for i:=1 to n do BEGIN
WRITELN;
for j:=1 to m do begin
a[i,j]:=random(10