Написать программу на языке PASCAL, реализующую алгоритм решения следующих задач (одной на выбор): 1. Вывод суммы натуральных чисел в заданном диапазоне Входные данные: N1, N2 – натуральные числа (от 0 до 255), нижняя и верхняя границы соответственно Выходные данные: Число – сумма всех натуральных чисел от N1 до N2 включительно. 2. Вывод произведения натуральных чисел в заданном диапазоне Входные данные: N1, N2 – натуральные числа (от 0 до 255), нижняя и верхняя границы соответственно Выходные данные: Число –произведение всех натуральных чисел от N1 до N2 включительно.

var

 i, sum, n1, n2: integer;

begin

 readln(n1, n2);

 for i := n1 to n2 do 

  sum := sum + i;

 writeln(sum);

end.