пару вопросов по масивам в паскале и С++

[Lorden]

народ помогити вот в этом коде сделать так чтобы в масив B выводились среднии значения из столбов масива А в строку:
#include<iostream.h>
int main(){
int A[6][6],B[5],i,j,m;
m=0;
for (i=1; i<6; i++)
for (j=1; j<6; j++)
cin>>A[i][j];
for (i=1; i<6; i++)
{
for (j=1; j<6; j++)
cout<<A[i][j];
cout<<endl;
}
for(j=1; j<6; j++)
{
m=0;
for(i=1; i<6; i++)
m+=A[i][j];
cout<<"sum "<<j<<" stolba="<<m<<endl;
B[i]=m/5;
cout<<B[i]<<endl;
}


}





и подскажити вчём ошибка вот этого кода при написании в паскале? в бэйсике писалось точно также но всё работало...

Program pr1;
var
A:array [1..10] of Integer;
z,m,n,j,i:Integer;
begin
for i:=1 to 10 do
read (A[i]);
for i:=1 to 9 do
m:=A[i];
for j:=i to 10 do
if A[j]<m then
m:=A[j];
k:=j;
z:=A(i);
A[i]:=m;
A[k]:=z;
for i:=1 to 10 do
write (A[i]);
end.

[puporev]

А что делает второй код? И что такое в нем z? Для чего переменная n?
Ну а это вообще шедевр:
m:=A[i];
for j:=i to 10 do
if A[i]<m then
С какого угара a[i] будет меньше m?
Думаю что подобный код и в Бейсике не будет работать.

[Lorden]

второй код для размещения чисел по порядку в одномерном массиве, ща посмотрю может я неправильно переписал просто

[puporev]

Это называется сортировка по убыванию, если надо по возрастанию смени знак< на >

Program pr1;
uses crt;
var a:array [1..10] of Integer;
    i,j,z:Integer;
begin
clrscr;
writeln('Vvedite 10 elementov massiva:');
for i:=1 to 10 do
read (a[i]);
readln;
for i:=1 to 9 do
for j:=i+1 to 10 do
if a[i]<a[j] then
  begin
    z:=A[i];
    a[i]:=a[j];
    a[j]:=z;
   end;
writeln('Otsortirovannyj massiv:');
for i:=1 to 10 do
write (a[i],' ');
readln;
end.

[Sazary]

Lorden Про первый код.. Так у вас и выводятся в B средние значения (правда, округленные).

Подправил, чтобы выводились вещественные значения.
Ручной ввод поменял на заполнение случайными.

#include<iostream.h>
#include <conio.h>
#include <time.h>
int main(){
int A[5][5],i,j,m;
double B[5];
srand(time(NULL));
m=0;
for (i=1; i<6; i++)
 {
	for (j=1; j<6; j++)
         {
	A[i][j] = rand()%20+1;
	cout.width(4);
	cout<<A[i][j];
	}
	cout<<endl;
	}
cout<<endl;

for(j=1; j<6; j++)
{
m=0;
for(i=1; i<6; i++)
m+=A[i][j];
cout<<"sum "<<j<<" stolba="<<m<<endl;
B[i]=(double)m/5;
cout<<B[i]<<endl;
}

getch();
return 0;
}

[Lorden]

Сообщение от puporev

Это называется сортировка по убыванию, если надо по возрастанию смени знак< на >

Program pr1;
uses crt;
var a:array [1..10] of Integer;
    i,j,z:Integer;
begin
clrscr;
writeln('Vvedite 10 elementov massiva:');
for i:=1 to 10 do
read (a[i]);
readln;
for i:=1 to 9 do
for j:=i+1 to 10 do
if a[i]<a[j] then
  begin
    z:=A[i];
    a[i]:=a[j];
    a[j]:=z;
   end;
writeln('Otsortirovannyj massiv:');
for i:=1 to 10 do
write (a[i],' ');
readln;
end.

спс, а по коду который я указывал там можете подсказать чё нетак? я его поправил чёток

[puporev]

там все не так, я даже не понимаю, что там написано.

[Lorden]

Сообщение от Sazary

Lorden Про первый код.. Так у вас и выводятся в B средние значения (правда, округленные).

Подправил, чтобы выводились вещественные значения.
Ручной ввод поменял на заполнение случайными.

#include<iostream.h>
#include <conio.h>
#include <time.h>
int main(){
int A[5][5],i,j,m;
double B[5];
srand(time(NULL));
m=0;
for (i=1; i<6; i++)
 {
	for (j=1; j<6; j++)
         {
	A[i][j] = rand()%20+1;
	cout.width(4);
	cout<<A[i][j];
	}
	cout<<endl;
	}
cout<<endl;

for(j=1; j<6; j++)
{
m=0;
for(i=1; i<6; i++)
m+=A[i][j];
cout<<"sum "<<j<<" stolba="<<m<<endl;
B[i]=(double)m/5;
cout<<B[i]<<endl;
}

getch();
return 0;
}

не я имел в виду чтоб среднии значения столбцов массива А выводило в массив Б в одной строке примерно так B=l3 4 5 6 7l вот это я немогу понять как сделать( ато выводит после суммы столба среднее значение

[Lorden]

Сообщение от puporev

там все не так, я даже не понимаю, что там написано.

блин вот в твоём коде всё понятно как описано) а я даже тот код который писал выше немогу корректно написать в бэйсике хотя в колледже смог какимто чудом его написать)

[Sazary]

Сообщение от Lorden

не я имел в виду чтоб среднии значения столбцов массива А выводило в массив Б в одной строке примерно так B=l3 4 5 6 7l вот это я немогу понять как сделать( ато выводит после суммы столба среднее значение

А.. Ну это просто )
Вместо

cout<<"sum "<<j<<" stolba="<<m<<endl;
B[i]=(double)m/5;
cout<<B[i]<<endl;

написать

B[i]=(double)m/5;
cout<<B[i];

Полный код:

#include<iostream.h>
#include <conio.h>
#include <time.h>
int main(){
int A[5][5],i,j,m;
double B[5];
srand(time(NULL));
m=0;
for (i=1; i<6; i++)
 {
		for (j=1; j<6; j++)
   {
				A[i][j] = rand()%20+1;
				cout.width(4);
				cout<<A[i][j];
			}
		cout<<endl;
	}
cout<<endl;

cout<<"B= ";
for(j=1; j<6; j++)
{
m=0;
for(i=1; i<6; i++)
  m+=A[i][j];
B[i]=(double)m/5;
cout<<B[i]<<"  ";
}
cout<<endl;
getch();
return 0;
}