Язык Basic Опции

[Гость_Ea*Rais!_*]

Расположить в массиве R, сначала положительно, а затем отрицательно элементы массива Z, массив Z(30)

Сообщение отредактировал Ea*Rais! - Nov 20 2005, 20:22

[Гость_Ea*Rais!_*]

Ссначала рисуешь овал и в нм пишешь начало, затем рисуешь параллелепипед там пиешь например, чтение исходного файла. Затем рисуеться ромб. в ромбе идет присуждение, например i := i +1. Потом снова овал и в нем пишешь Конец. Если что я тебе могу дать пример блок схемы.

[Гость_Gidomak_*]

Народ, дайте пожалуйста кто нить ссылку на сам бэйсик для ВТ, и на какой нить учебник

[Kumarr]

народ помогите плиз прогу в QBasic'е надо написать: дан двумерный целочисленный массив A(m;n). Задается с экрана либо генерируется в пределах (-20;20). (<- эту часть я сделал)
А дальше не знаю как: Требуется найти среднее арифметическое каждого столбца

[Gobbs]

народ помогите плиз прогу в QBasic'е надо написать: дан двумерный целочисленный массив A(m;n). Задается с экрана либо генерируется в пределах (-20;20). (<- эту часть я сделал)
А дальше не знаю как: Требуется найти среднее арифметическое каждого столбца

Алгоритм следующий.

CODE

#include<conio.h>
#include<iostream.h>

int main()
{
int m=2,n=2;
int A[2][2]={{1,1},
{3,4}};
for(int i=0;i<m;i++)
{
float temp=0;
for(int k=0;k<n;k++){
temp+=A[k][i];
cout<<"srednee arifm-oe stolbca #"<<i<<" "<<temp/m<<endl;
}
getch();
return 0;
}

P.S. к сожалению, с бейсиком не знаком, но принцип работы алгоритма, думаю, понять из этого кода можно.

Сообщение отредактировал Gobbs - Oct 12 2007, 23:33

[Kumarr]

Алгоритм следующий.

CODE

#include<conio.h>
#include<iostream.h>

int main()
{
int m=2,n=2;
int A[2][2]={{1,1},
{3,4}};
for(int i=0;i<m;i++)
{
float temp=0;
for(int k=0;k<n;k++){
temp+=A[k][i];
cout<<"srednee arifm-oe stolbca #"<<i<<" "<<temp/m<<endl;
}
getch();
return 0;
}

P.S. к сожалению, с бейсиком не знаком, но принцип работы алгоритма, думаю, понять из этого кода можно.

если честно то ниче не понял)

[Gruzin]

кхм...читал читал и вот что подумал.. мне тут вспомнилась школьная задачка тупост полная но так и не смог посчитаьь... 2 в степени 800
в бесике... таких чисел он не считает...мне кажется... у него не хватит длинны строки на обозначение сокращения.. я прав?
если так то интерестно зачем давать такие задачи и горить что они решимы...

[Gobbs]

я прав?

нет.

[Гость_G1UK_*]

народ помогите плиз прогу в QBasic'е надо написать: дан двумерный целочисленный массив A(m;n). Задается с экрана либо генерируется в пределах (-20;20). (<- эту часть я сделал)
А дальше не знаю как: Требуется найти среднее арифметическое каждого столбца

Код

rem ...
ind1=0
ind2=0
while (ind1<=m and ind2<=n) do
ind1=ind1+1
ind2=ind2+1
sum=sum+A(ind1;ind2)
kolvo=kolvo+1
endwhile
srarifm=sum/kolvo
print "srednee arifmeticheskoe= ",srarifm

qbasica подрукой нет но вроде так... Ухх какой встеки qbasic изврат ))) на С у гоббса намного красивее смотриться и читать приятно ) круглые скобки для масивов тож как то странно смотряться ))) У мну там кое-где синтаксические ошибки могут быть, но думаю подправить можно будет.

[Kumarr]

Код

rem ...
ind1=0
ind2=0
while (ind1<=m and ind2<=n) do
ind1=ind1+1
ind2=ind2+1
sum=sum+A(ind1;ind2)
kolvo=kolvo+1
endwhile
srarifm=sum/kolvo
print "srednee arifmeticheskoe= ",srarifm

qbasica подрукой нет но вроде так... Ухх какой встеки qbasic изврат ))) на С у гоббса намного красивее смотриться и читать приятно ) круглые скобки для масивов тож как то странно смотряться ))) У мну там кое-где синтаксические ошибки могут быть, но думаю подправить можно будет.

неа, нифига не получается
вот на этом месте ругается : sum=sum+A(ind1;ind2)

[Гость_G1UK_*]

Попробуй sum=sum+a(ind1,ind2) вместо ;

[Kumarr]

Попробуй sum=sum+a(ind1,ind2) вместо ;

пробовал, так же ругается "индекс вне диапазона"

[Гость_G1UK_*]

m и n - кол-во элементов строки и ряда соответственно. Ты их задал ?

[Kumarr]

m и n - кол-во элементов строки и ряда соответственно. Ты их задал ?

да, вроде - я не совсем тебя понял..

[Gruzin]

нет.

будь добр тогда скажи решение...