Подскажите пожалуйста. Нужно проверить решение задачи в QBasic, но данная программа не...

Question

Подскажите пожалуйста. Нужно проверить решение задачи в QBasic, но данная программа не идет на Windows 7. Как быть в этом случае?

Comments

поискать онлайн компиляторы. и ваще выложи код и посмотрим

---

Дано одно число. Если и синус и косинус этого числа превышает 0,3, то вычислить и напечатать квадрат этого числа, в противном случае его куб

---

REM CLS INPUT “Ввод числа X”, X IF sinX>0.3 and cosX>0.3 THEN Let A=X^2 ELSE IF sinX<0.3 and cosX<0.3 THEN Let A=X^3 END IF END IF PRINT “A”,A END

---

а почему вам такое старье дают? есть же куча бейсиков с более новыми компиляторами

---

Потому что первый курс прикладной информатики...Спасибо, что попытались помочь, нашла все-таки программу, которая идет на семерке

Answer 1

Вот так программа больше походит на программу

REM
CLS
Dim X as integer
Dim A as integer
INPUT "Ввод числа X ", X
IF sin(X)>0.3 and cos(X)>0.3 THEN
    A=X^2
ELSE
   A=X^3
END IF
PRINT "A ",A
END

увы найти конкретно компилятор под квик бейсик не удалось и поскольку в разных бейсиках не шарю, то подсказать трудно
Qbasic завелся на виртуалке на xp, код принял и отработал. Только одно но - русский текст не понимает, лучше писать транслитом или на англ