Вычислить сумму ряда чисел 2+4+6...+50
Это сумма арифметической прогрессии... причем тут информатика?
Program n1; var s,a:real; begins:=0; a:=0; while a<50 do<br>begin a:=a+2; s:=s+a; end; writeln('сумма=',s); end.
Можно было одной формулой 50/2*(2+50)/2