Составьте программу вычисления суммы целых чисел от 2 до 17. Пример работы: Сумма чисел от 2 до 17 составляет 152 помогите пж(через паскаль надо)
Program summ_ot_2_do_17;uses crt;var a,b:real; Begin b:= 0; a:= 2; while a<=17 do begin b:= b+a; a:= a+1; end; writeln('Summa = ', b);End.<br>