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

Question

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

Answer 1

QBASIC

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