|
Опять информатика((((
| |
| Homka | Дата: Вторник, 2009-11-03, 10:35 PM | Сообщение # 1 |
|
Абитуриент
Группа: Пользователи
Сообщений: 6
Репутация: 13
Замечания: 0%
Статус: Offline
| Составить блок-схему алгоритма решения следующей задачи и записать его в виде исходного кода на языке Visual Basic: в матрице размера 6*3 найти номера строк, все элементы которых положительны. Кто понимает как и о чем помогите,пожалуйста....
|
| |
| |
| andreich | Дата: Среда, 2009-11-04, 8:16 AM | Сообщение # 2 |
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Замечания: 0%
Статус: Offline
Город: Екатеринбург
| Homka, на паскале бы написал, а так думаю смысла нет
июнь 2009-мы творили чудеса!
|
| |
| |
| kykc | Дата: Среда, 2009-11-04, 3:02 PM | Сообщение # 3 |
|
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Замечания: 100%
Статус: Offline
| Quote (Homka) в матрице размера 6*3 найти номера строк, все элементы которых положительны.
както влом тетрадку находить и пасматреть как делать, вроде мы такой х**** в школе занимались
|
| |
| |
| redberret | Дата: Среда, 2009-11-04, 3:59 PM | Сообщение # 4 |
|
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Замечания: 0%
Статус: Offline
Город: Kazan City
| 6 строк, 3 столбца?
|
| |
| |
| kykc | Дата: Среда, 2009-11-04, 4:36 PM | Сообщение # 5 |
|
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Замечания: 100%
Статус: Offline
| Quote (redberret) 6 строк, 3 столбца?
не глупи, массив состоит из 18 значений, где для фор х=1 то 6, фор y= 1 то 3,
дык надо найти где типа А(1,у) (ну и тд) былоб положительное
|
| |
| |
| redberret | Дата: Среда, 2009-11-04, 7:42 PM | Сообщение # 6 |
|
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Замечания: 0%
Статус: Offline
Город: Kazan City
| Quote (kykc) не глупи, массив состоит из 18 значений, где для фор х=1 то 6, фор y= 1 то 3, дык надо найти где типа А(1,у) (ну и тд) былоб положительное
Во-первых я спросил не у тебя, во-вторых я знаю, из скольки элементом он состоит. Меня интересует как задал массив автор. Строки/столбцы или столбцы/строки. Если строки/столбцы, то гораздо легче будет найти так:
Арифметический цикл по i (строкам)(от 1 до 6) и проверяем:
if (a[i,1] and a[i,2] and a[i,3])>0 then
//Вывод сообщения на экран о том, что все элементы i-ой строки положительны.
Сообщение отредактировал redberret - Среда, 2009-11-04, 7:43 PM |
| |
| |
| kykc | Дата: Среда, 2009-11-04, 9:15 PM | Сообщение # 7 |
|
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Замечания: 100%
Статус: Offline
| Quote (redberret) if (a[i,1] and a[i,2] and a[i,3])>0
шутник, ниче нескажу))))
зы забудь паскаль
|
| |
| |
| redberret | Дата: Среда, 2009-11-04, 9:32 PM | Сообщение # 8 |
|
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Замечания: 0%
Статус: Offline
Город: Kazan City
| Тебя что-то не устраивает?
|
| |
| |
| andreich | Дата: Среда, 2009-11-04, 9:36 PM | Сообщение # 9 |
|
Аспирант
Группа: Проверенные
Сообщений: 484
Репутация: 60
Замечания: 0%
Статус: Offline
Город: Екатеринбург
| kykc, ты достал уже если честно...если не нравится то напиши сам!!! не тебе людей судить! судилка не выросла еще
июнь 2009-мы творили чудеса!
|
| |
| |
| kykc | Дата: Среда, 2009-11-04, 11:11 PM | Сообщение # 10 |
|
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Замечания: 100%
Статус: Offline
| Quote (redberret) Тебя что-то не устраивает?
гы лол, скока непиши в басике квидритных скобок он те их заменит на круглые, ну в главных твое условие неправильно записано))))))) короче тваё условие полюбому должно будит выглядить так:
CLS
DEFINT A-D
DIM d(6, 3)
FOR a = 1 TO 6
FOR b = 1 TO 3
d(a, b) = RND * 100 - 50
IF d(a, 1) > 0 AND d(a, 2) > 0 AND d(a, 3) > 0 THEN PRINT a
LOCATE a, b * 10
PRINT d(a, b)
NEXT b, a
|
| |
| |
| redberret | Дата: Среда, 2009-11-04, 11:49 PM | Сообщение # 11 |
|
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Замечания: 0%
Статус: Offline
Город: Kazan City
| Синтаксиса не знаю. Главное то, чтобы автор меня понял. Остальное за ним.
|
| |
| |
| kykc | Дата: Четверг, 2009-11-05, 6:23 PM | Сообщение # 12 |
|
Академик
Группа: Проверенные
Сообщений: 1237
Репутация: 1175
Замечания: 100%
Статус: Offline
| гы шо панимать уже? прогграмма написана
|
| |
| |
| redberret | Дата: Четверг, 2009-11-05, 7:23 PM | Сообщение # 13 |
|
Магистр
Группа: Проверенные
Сообщений: 211
Репутация: 8
Замечания: 0%
Статус: Offline
Город: Kazan City
| С полки возьми пирожок за программу.
|
| |
| |
| Remo | Дата: Понедельник, 2010-01-04, 1:42 AM | Сообщение # 14 |
|
Магистр
Группа: Проверенные
Сообщений: 218
Репутация: 9
Замечания: 0%
Статус: Offline
| Программа и блок схема - 200р. http://prog.500mb.ru/
|
| |
| |
|
|
|
RSS: