<script type="text/javascript">
// создание многомерного массива.
var arr = new Array(5);
arr[0]= new Array(-1, 2, -3, 4, 5);
arr[1]= new Array(6, 7, -8, 9, 1);
arr[2]= new Array(4, -5, 6, 7, 8);
arr[3]= new Array(-3, 2, -1, 9, 8);
arr[4]= new Array(7, -6, -5, 4, -3);
for (var i = 0; i < arr.length; i++) {
for (var j = 0; j < arr[i].length; j++) {
if (i==j){
if (arr[i][j] < 0)
arr[i][j]= "0"
else
arr[i][j] = "1" ;
//вывод заполненной Ячейки сразу
}
document.write(" " +arr[i][j]+ "");
}
document.write("<br/>");
}
</script>
Program Massive;
uses Crt;
const
K = 3;
L = 6;
var
Z: array [1..K * L] of integer;
R: array [1..K * L] of integer;
Q: array [1..K * L] of integer;
i: integer;
x: integer;
begin
Randomize;
x := K * L;
for i:= 1 to x do
begin
Z[i] := Random(20);
R[i] := Random(10);
end;
ClrScr;
writeln('Massive Z:');
for i:= 1 to x do
write(Z[i]:4);
writeln;
writeln('Massive R:');
for i:= 1 to x do
write(R[i]:4);
writeln;
for i:= 1 to x do
Q[i]:= Z[i] * R[i] + 10;
writeln('Massive Q:');
for i:= 1 to x do
write (Q[i]:4);
readln
end.