** QBASIC составить программу для вычислений по формуле: s=5a^3 при a<=o ; s=2a^2 при а>0.

Question

На QBASIC составить программу для вычислений по формуле: s=5a^3 при a<=o ; s=2a^2 при а>0.

Answer 1

CLS

INPUT "a="; a

IF a > 0 THEN

S = 2 * a ^ 2

ELSE

S = 5 * a ^ 3

END IF

PRINT "S="; S