Question

Программа для вычисления суммы n чисел

 

Answer 1

СLS

a:

INPUT n

IF n<1 OR INT(n)<>n THEN PRINT "не может быть": GOTO a

FOR i=1 TO n

s=s+i

NEXT i

PRINT "Сумма"; n;  "чисел равна"; s

END