Ксения Абрамова
Запишите фрагменты решения задачи на Паскаль. 5+6+7+...+(n+5) ПОМОГИТЕ СРОЧНО ПОЖАЛУЙСТА!
Запишите фрагменты решения задачи на Паскаль. 5+6+7+...+(n+5)
Запишите фрагменты решения задачи на Паскаль. 5+6+7+...+(n+5)
Согласно: http://ru.wikipedia.org/wiki/Арифметическая_прогрессияhttp://ru.wikipedia.org/wiki/Арифметическая_прогрессия
S := ((2*5 + n) * (n+1)) div 2;
или
S := (10+n) * (n+1) div 2;
S:= (10n + 10 + n*n + n) div 2;
S:= (n*n + 11n + 10) div 2;
На яваскрипте
sum = 0;
n = prompt('n?');
if (n < alert('мало! ');
else
{
for (vr = 5; vr <= 5 + parseInt(n); vr++)
sum += vr;
alert(sum);
}
program p1;
var s, n, i: integer;
begin
Такой фрагмент подойдет?
Sum := 0; for i := 0 to n do Sum := Sum + (i+5);