Язык Basic |
Здравствуйте, гость ( Вход | Регистрация )
Язык Basic |
Гость_Ea*Rais!_* |
Nov 20 2005, 18:24
Сообщение
#1
|
Guests |
Расположить в массиве R, сначала положительно, а затем отрицательно элементы массива Z, массив Z(30)
Сообщение отредактировал Ea*Rais! - Nov 20 2005, 20:22 |
|
|
Гость_Ea*Rais!_* |
Nov 21 2005, 22:01
Сообщение
#21
|
Guests |
Ссначала рисуешь овал и в нм пишешь начало, затем рисуешь параллелепипед там пиешь например, чтение исходного файла. Затем рисуеться ромб. в ромбе идет присуждение, например i := i +1. Потом снова овал и в нем пишешь Конец. Если что я тебе могу дать пример блок схемы.
|
|
|
Гость_Gidomak_* |
Sep 23 2007, 22:17
Сообщение
#22
|
Guests |
Народ, дайте пожалуйста кто нить ссылку на сам бэйсик для ВТ, и на какой нить учебник
|
|
|
Oct 12 2007, 15:31
Сообщение
#23
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
народ помогите плиз прогу в QBasic'е надо написать: дан двумерный целочисленный массив A(m;n). Задается с экрана либо генерируется в пределах (-20;20). (<- эту часть я сделал)
А дальше не знаю как: Требуется найти среднее арифметическое каждого столбца -------------------- |
|
|
Oct 12 2007, 23:30
Сообщение
#24
|
|
Супер постер Группа: Local moder Сообщений: 888 Регистрация: 23.10.2005 Из: п.Кугеси Пользователь №: 106 |
народ помогите плиз прогу в 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 |
|
|
Oct 13 2007, 14:17
Сообщение
#25
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
Алгоритм следующий. 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. к сожалению, с бейсиком не знаком, но принцип работы алгоритма, думаю, понять из этого кода можно. если честно то ниче не понял) -------------------- |
|
|
Oct 13 2007, 14:40
Сообщение
#26
|
|
Одинокий пилигрим... Группа: Posters Сообщений: 453 Регистрация: 25.8.2006 Из: Под городом Горьким Пользователь №: 1,326 |
кхм...читал читал и вот что подумал.. мне тут вспомнилась школьная задачка тупост полная но так и не смог посчитаьь... 2 в степени 800
в бесике... таких чисел он не считает...мне кажется... у него не хватит длинны строки на обозначение сокращения.. я прав? если так то интерестно зачем давать такие задачи и горить что они решимы... -------------------- Воину Аллаха паспорт не нужен!
Детям нельзя в интернет. От детей интернет тупеет. My song... Very beautiful song... |
|
|
Oct 13 2007, 15:18
Сообщение
#27
|
|
Супер постер Группа: Local moder Сообщений: 888 Регистрация: 23.10.2005 Из: п.Кугеси Пользователь №: 106 |
|
|
|
Гость_G1UK_* |
Oct 13 2007, 15:39
Сообщение
#28
|
Guests |
народ помогите плиз прогу в 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 изврат ))) на С у гоббса намного красивее смотриться и читать приятно ) круглые скобки для масивов тож как то странно смотряться ))) У мну там кое-где синтаксические ошибки могут быть, но думаю подправить можно будет. |
|
|
Oct 17 2007, 14:18
Сообщение
#29
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
Код 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_* |
Oct 17 2007, 18:21
Сообщение
#30
|
Guests |
Попробуй sum=sum+a(ind1,ind2) вместо ;
|
|
|
Oct 17 2007, 18:39
Сообщение
#31
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
Попробуй sum=sum+a(ind1,ind2) вместо ; пробовал, так же ругается "индекс вне диапазона" -------------------- |
|
|
Гость_G1UK_* |
Oct 18 2007, 09:40
Сообщение
#32
|
Guests |
m и n - кол-во элементов строки и ряда соответственно. Ты их задал ?
|
|
|
Oct 20 2007, 20:48
Сообщение
#33
|
|
Новичок Группа: Posters Сообщений: 19 Регистрация: 7.5.2007 Пользователь №: 6,556 |
m и n - кол-во элементов строки и ряда соответственно. Ты их задал ? да, вроде - я не совсем тебя понял.. -------------------- |
|
|
Oct 21 2007, 11:17
Сообщение
#34
|
|
Одинокий пилигрим... Группа: Posters Сообщений: 453 Регистрация: 25.8.2006 Из: Под городом Горьким Пользователь №: 1,326 |
-------------------- Воину Аллаха паспорт не нужен!
Детям нельзя в интернет. От детей интернет тупеет. My song... Very beautiful song... |
|
|
Текстовая версия | Сейчас: 13th May 2024 - 13:40 |