Определить сумму всех чисел от N до M.

если можно на языке Паскаль

надо было в задании указывать, щас попробую

на языке паскальprogram summa;varn, m, i, sum: integer;beginwrite (' введите N: '); readln (n);write (' введите M: '); readln (m);sum := 0;for i:=n to m dosum := sum + i;writeln (sum);readlnend.

Var n,m : Integer;Begin Write (' введите N: '); Readln (n); Write (' введите M: '); Readln (m); Writeln ((n+m)*(m-n+1) div 2);end.