#include<iostream>
using namespace std;
int main()
{
int x[100],y[100],z[100],n;
setlocale(LC_ALL,"Russian");
cout<<"Введите размерность массивов."<<endl;
cin>>n;
for(int i=1;i<=n;i++)
{
cout<<"Введите "<<i<<"-й элемент 1-го массива"<<endl;
cin>>x[i];
}
for(int i=1;i<=n;i++)
{
cout<<"Введите "<<i<<"-й элемент 2-го массива"<<endl;
cin>>y[i];
}
for(int i=1;i<=n;i++)
{
z[i]=x[i]*y[i];
cout<<i<<"-й элемент 3-го массива = "<<z[i]<<endl;
}
return 0;
}
program sorting;
const
N = 10;
var
v: array[1..N] of integer;
d: integer;
i, t: integer;
k: boolean;
begin
randomize;
write('ДО сортировки: ');
for i := 1 to N do
begin
readln(v[i])
write(v[i]:6);
end;
}
d := N div 2;
while(d > 0) do
begin
k := true;
while k do
begin
k := false;
i := 1;
for i := 1 to N - d do
begin
if(v[i] > v[i + d]) then
begin
t := v[i];
v[i] := v[i + d];
v[i + d] := t;
k := true;
end;
end;
end;
d := d div 2;
end;
writeln;
write('ПОСЛЕ сортировки: ');
for i := 1 to N do
write(v[i]:6);
writeln;
end.