Предмет: Информатика,
автор: zmm5
Помогите, решить задачу на ЯП QBasic:
"Найти среднее арифмитеческое пятидесяти первых натуральных чисел".
Ответы
Автор ответа:
0
DIM i AS INTEGER
DIM s AS INTEGER
DIM n AS INTEGER
CLS
n = 50
FOR i = 1 TO n
s = s + i
NEXT i
PRINT "sr=", s / n
END
DIM s AS INTEGER
DIM n AS INTEGER
CLS
n = 50
FOR i = 1 TO n
s = s + i
NEXT i
PRINT "sr=", s / n
END
Похожие вопросы
Предмет: Английский язык,
автор: викторияммг
Предмет: Русский язык,
автор: mayamanya74
Предмет: Английский язык,
автор: lesikon11
Предмет: Английский язык,
автор: Kominka
Предмет: Алгебра,
автор: kuryliakira