Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.12.2018, 09:17   #1
Lektorfuja
Форумчанин
 
Аватар для Lektorfuja
 
Регистрация: 04.11.2016
Сообщений: 355
По умолчанию Ошибка в генерации чисел на Basic

Я скачал на свой Андроид приложение Frodo C64(это компилятор старого Basic)
Написал код:
Код:
10 A=INT (RND(1)*2)
20 IF A="1" THEN PRINT "YOU WON"
30 IF A="2" THEN PRINT "YOU LOSE"
Далее я написал "RUN" ,но выскочила надпись:
"?TYPE MISMATCH ERROR IN 20".
Как я понимаю,ошибка в строчке 20,но что делать?
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код"
Lektorfuja вне форума Ответить с цитированием
Старый 04.12.2018, 09:27   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

"1" != 1
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 04.12.2018, 13:24   #3
kvitaliy
Участник клуба
 
Регистрация: 17.05.2011
Сообщений: 1,660
По умолчанию

Цитата:
Сообщение от Lektorfuja Посмотреть сообщение
что делать?
TYPE MISMATCH это несоответствие типов.
Вам нужно перестать сравнивать строки с числами.
Правильнее если
IF A = 2 THEN PRINT "YOU LOSE"

И ещё, при такой генерации чисел
A=INT (RND(1)*2)

Переменная А никогда не примет значение, указанное вами в одном из условий. Какое именно, 1 или 2 это вы сами догадайтесь.
kvitaliy вне форума Ответить с цитированием
Старый 04.12.2018, 13:42   #4
Lektorfuja
Форумчанин
 
Аватар для Lektorfuja
 
Регистрация: 04.11.2016
Сообщений: 355
По умолчанию

Вот верный код:
Код:
10 A=INT(RND(1)*2)
20 IF A=0 THEN PRINT "ZERO"
30 IF A=1 THEN PRINT "ONE"
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код"
Lektorfuja вне форума Ответить с цитированием
Старый 04.12.2018, 13:48   #5
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

И ONE вернуло хоть раз?
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 04.12.2018, 13:51   #6
Lektorfuja
Форумчанин
 
Аватар для Lektorfuja
 
Регистрация: 04.11.2016
Сообщений: 355
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
И ONE вернуло хоть раз?
генерация двух чисел это "ноль" и "единица".
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код"
Lektorfuja вне форума Ответить с цитированием
Старый 04.12.2018, 13:59   #7
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,707
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
И ONE вернуло хоть раз?
Вернет. https://www.c64-wiki.com/wiki/RND
p51x вне форума Ответить с цитированием
Старый 04.12.2018, 14:06   #8
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

А, там параметр хитрую роль играет.
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 04.12.2018, 15:12   #9
Lektorfuja
Форумчанин
 
Аватар для Lektorfuja
 
Регистрация: 04.11.2016
Сообщений: 355
По умолчанию

У меня только POKE не работает в Frodo C64.
мой блог :patreon.com/hopkins1988 . facebook группы:"программирование на Андроид","
"Программирование чистый код"
Lektorfuja вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Алгоритмы генерации псевдослучайных чисел absolute-clock Общие вопросы .NET 0 08.11.2015 14:48
Написать рекурсивную процедуру генерации всех перестановок чисел от 1 до n Proskurina Паскаль, Turbo Pascal, PascalABC.NET 5 04.06.2012 10:34
функция генерации случайных чисел rand() в main pufystyj Общие вопросы C/C++ 4 08.02.2011 21:09
Пара вопросов по генерации чисел gamer123 Общие вопросы Delphi 5 26.07.2010 17:02