Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Люди, помогите моей дочке с Бэйсиком / 7 сообщений из 7, страница 1 из 1
22.05.2003, 18:10
    #32166545
Димастик
Димастик
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
Очень прошу помочь моей дочке (9 класс). Злой учитель информатики дал ей задание. Она долго болела и не понимает его. А я в Бэйсике вообще ничего не понимаю. Если завтра не сдаст дискету-будет двойка в году. Требуется в Бейсике V4.5. (смог найти только такую програму) написать, как я понимаю,
программу. Задание звучит так: "Умножьте элементы массива на 2 и выведите в столбик положительные из них (одномерные массивы)".
Это наверное должно быть просто - но для тех кто понимает. Помогите дочке и ее папе пожалуйства с текстом программы. Заранее спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2003, 18:36
    #32166571
Garya
GaryaПривилегированный пользователь
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
Dim M(10)
Rem Заполняем массив
For I=1 to 10
M(I) = I-5
Next I
Rem Решаем поставленную задачу
For I=1 to 10
M(I)=M(I)*2
IF M(I)>0 THEN PRINT "M("; I; ")="; M(I)
Next I
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2003, 10:02
    #32166792
mahoune
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
А учитель что, математику не изучал
т.к. число умноженное на 2 всегда положительно!
MAHOUNE
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2003, 10:10
    #32166801
eNose
eNose
Участник
[не активирован]
[не одобрен]
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
Спорное утверждение

-1 * 2 = -2
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2003, 10:17
    #32166812
Артем1
Артем1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
Промашечка
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
23.05.2003, 10:39
    #32166855
mahoune
mahoune
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
Ну перепутал с квадратом!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.05.2003, 13:26
    #32170633
vbuoc
vbuoc
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Люди, помогите моей дочке с Бэйсиком
dim x(30)
input "Введите размерность массива:(<30) ";n

print "Исх. Массив";
for i=1 to n
x(i)=rnd(time-1)*9+1
print x(i);",";
next i

print
print "Этот Массив х2 ";
for i=1 to n
x(i)=x(i)*2
print x(i);",";
next i

print
print "Рез-т: ";
for i=1 to n
if x(i)>0 then
print x(i);",";
end if
next i
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Люди, помогите моей дочке с Бэйсиком / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]