Паскаль. Вычислить сумму ряда 1+1.5+2+2.5+3+3.5+ .. + 30.

var

 a,s: real;

begin

a:=1;

s:=1;

repeat  

 a:=a+0.5;

 s:=s+a;

 until a=30;

 writeln(s);

end.

ответ: 914.5

напиши само ,я

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются