uses crt; var a:array[1..7,1..10] of integer; b,i,j:integer; begin clrscr; randomize();
//заполнение массива случайными числами
for i:=1 to 7 do for j:=1 to 10 do begin a[i,j]:=random(10); end;
//вывод массива
for i:=1 to 7 do begin for j:=1 to 10 do write(a[i,j]:3,' '); writeln(); writeln(); end;
//удаляем строку 6 и меняем 5 и 2 строки местами
for j:=1 to 10 do begin a[6,j]:=a[7,j]; a[7,j]:=0; b:=a[5,j]; a[5,j]:=a[2,j]; a[2,j]:=b; end; writeln('Отредактированный массив'); //выводим отредактированный массив for i:=1 to 6 do begin for j:=1 to 10 do write(a[i,j]:3,' '); writeln(); writeln(); end; readln(); end.
)Соберите данные из текста, и создайте диаграмму или постер.
САМ ТЕКСТ↓↓↓↓↓
«Ұлы Жібек жолы» — Қазақстан жері арқылы өткен сауда-саттық жолы.
Қазақстанның ортағасырлық қалаВЫФФФларында жүргізілген қазба жұмыстары кезінде археологтер
Қытай мен Византия, Иран мен Үндістан елдерінде соғылған теңгелер мен ділдаларды
тапқан. Алматы қаласының маңындағы Талғар қаласының орнын қазған кезде Иранда
жаЗалған қола табақ, қытай фарфоры мен жапонның фаянс тостағанының сынығы және т.б.
бұйымдар табылған.
«Ұлы Жібек жолының» бойымен саудагерлер Ферғананың әйгілі тұлпарларын, түйе,
пілдермен қатар барқыт, жібек, мақпал, торғын маталарды, киім-кешекті және т. б. бағалы
тауарларды сату үшін алып өткен. Осы жол арқылы қант, жүзім, шабдалы, қауын сияқты
жеміс-жидек те саудаланған.
Объяснение:
uses crt;
var
a:array[1..7,1..10] of integer;
b,i,j:integer;
begin
clrscr;
randomize();
//заполнение массива случайными числами
for i:=1 to 7 do
for j:=1 to 10 do
begin
a[i,j]:=random(10);
end;
//вывод массива
for i:=1 to 7 do
begin
for j:=1 to 10 do
write(a[i,j]:3,' ');
writeln();
writeln();
end;
//удаляем строку 6 и меняем 5 и 2 строки местами
for j:=1 to 10 do
begin
a[6,j]:=a[7,j];
a[7,j]:=0;
b:=a[5,j];
a[5,j]:=a[2,j];
a[2,j]:=b;
end;
writeln('Отредактированный массив');
//выводим отредактированный массив
for i:=1 to 6 do
begin
for j:=1 to 10 do
write(a[i,j]:3,' ');
writeln();
writeln();
end;
readln();
end.