Составьте программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N.
Составьте программу вычисления суммы всех натуральных чисел, не превышающих заданного натурального числа N.
Гость
Ответ(ы) на вопрос:
ГостьCLS
a:
INPUT n
IF INT(n)<>n OR n<1 THEN PRINT "не может быть": GOTO a
FOR i=1 TO n
s=s+i
NEXT i
PRINT "сумма равна" ; s
END
Не нашли ответ?
Похожие вопросы