Информатика, опубликовано 2018-08-22 23:13:04 by Гость

Помогите, решить задачу на ЯП QBasic: "Найти среднее арифмитеческое пятидесяти первых натуральных чисел".

Ответ оставил Гость

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

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.