Задание:
Составить программу нахождения суммы целых чисел из промежутка ab.
Решение:
Var: a, b, s: integer; BeginReadln (a, b); For I: =a to b doS: =s+I; Writeln (s); ReadlnEnd.
Знаете другой ответ?
Составить программу нахождения суммы целых чисел из промежутка ab.
Var: a, b, s: integer; BeginReadln (a, b); For I: =a to b doS: =s+I; Writeln (s); ReadlnEnd.
Знаете другой ответ?