СРОЧНООООООО ПЛИИИИЗ ДО ЗАВТРА ПАМАГИТЕ С ИНФОРМАТИКОЙ
ДАЮ 30 БАЛЛОВ!!!
Исправьте алгоритм,чтобы можно было найти 10 степень любого заданного числа:
REM-"2^10"
CLS
S=0
FOR i=1 TO 10 STEP 1
S=S×2
NEXT i
PRINT - S=" ";S
END
Ответы на вопрос
Ответил fedrfedr
1
Ответ:
CLS
S=0 *** Здесь нужно сделать ввод значения S c клавиатуры
FOR i=1 TO 10 STEP 1
S=S×2 *** Здесь нужно написать S=S×S
NEXT i
PRINT - S=" ";S
END
Объяснение:
У Вас в цикле S равное нулю умножается 10 раз на 2, получится 0
Нужно ввести значение числа в S и 10 раз умножить его само на себя, тогда будет в результате десятая степень этого числа.
Я на бейсике на программирую могу только так помочь
fedrfedr:
Нужно написать команду для ввода любого числа с клавиатуры. Как на бейсике это выглядит я не знаю
вот поправленная (с нумерацией строк):
10 REM "x^10"
20 CLS
30 LET S=1
40 INPUT "x= ";x
50 FOR i=1 TO 10 STEP 1
60 LET S=S*x
70 NEXT i
80 PRINT "S= ";S
90 END
ну или как у вас было (без №строк и без LET ):
REM "x^10"
CLS
S=1
INPUT "x= ";xFOR i=1 TO 10 STEP 1
60 LET S=S*x
70 NEXT i
80 PRINT "S= ";S
90 END
Нужно у вас пробовать запускать,
10 REM "x^10"
20 CLS
30 LET S=1
40 INPUT "x= ";x
50 FOR i=1 TO 10 STEP 1
60 LET S=S*x
70 NEXT i
80 PRINT "S= ";S
90 END
ну или как у вас было (без №строк и без LET ):
REM "x^10"
CLS
S=1
INPUT "x= ";xFOR i=1 TO 10 STEP 1
60 LET S=S*x
70 NEXT i
80 PRINT "S= ";S
90 END
Нужно у вас пробовать запускать,
ну или как у вас было (без №строк и без LET ):
REM "x^10"
CLS
S=1
INPUT "x= ";x
FOR i=1 TO 10 STEP 1
S=S*x
NEXT i
PRINT "S= ";S
END
Надо запускать у вас, не знаю что там за версия Бейсик, возможно что то ещё надо будет править.
REM "x^10"
CLS
S=1
INPUT "x= ";x
FOR i=1 TO 10 STEP 1
S=S*x
NEXT i
PRINT "S= ";S
END
Надо запускать у вас, не знаю что там за версия Бейсик, возможно что то ещё надо будет править.
У меня Q Бейсик
а вы работаете с ним?⤴
Новые вопросы