Var m:array[1..9,1..9] of integer;
s,j,i:integer;
begin
randomize;
s:=0;
For i:=1 to 9 do
For j:=1 to 9 do
m[i,j]:=random(100)+1;
For i:=1 to 9 do
For j:=1 to 9 do
s:=s+m[i,j];
writeln('Сумма элементов двумерного массива размерностью 9*9 = ',s);
end.
Ориентированный граф (кратко орграф) — (мульти) граф, рёбрам которого присвоено направление. Направленные рёбра именуются также дугами, а в некоторых источниках и просто рёбрами.
Это сложно.
Но можно решить.
Через 5 мин отвечу.
Ну всё пока
32 = 2 в степени 5
5 бит на символ
Текст 1,5 Кб = 1536 байт = 12288 бит
<span>12288/5 = 2457 символов</span>
Program gt;
var a:array[1..6]of integer;
i,s:integer;
begin
randomize;
s:=0;
for i:=1 to 6 do
begin
a[i]:=random(101)+20;
write(a[i],' ');
s:=s+a[i];
end;
writeln;
writeln(s);
end.