Question

напишите программу на языке бейсик для вычисления произведения С=3^2*5^2*7^2*...S^2. при вводе данных учтите, что S>3

Answer 1

QBASIC

WHILE s <= 3
    INPUT "S<3 S="; s
WEND
C = 1
FOR I = 3 TO s STEP 2
    C = C * I * I
NEXT I
PRINT "C="; C