Задачка. Находим случайное число используя MathRand(), и надо определить - четное или нечетное число. - страница 2

 
Alexander Ivanov:
Вот на простом бейсике.

10 LET B=INT(RND(7))  
20 LET A=INT(B/2)                      //   Возвращает ближайшее сверху целое числовое значение.
30 IF (A*2)<B THEN PRINT"Нечетное число"
40 IF (A*2)=B THEN PRINT"Четное число"
45 PRINT B
50 PRINT"Ок."


программу можно проверить онлайн тут - http://www.quitebasic.com/user/


если что, в Бейсике есть оператор MOD
 
Mesaoria:  если что, в Бейсике есть оператор MOD

В кодеБазе есть уже советники с рандомным открытием - пишут, приносят доход - ищите слово Random