написать Актуальность проекта по информатике по теме " Решении задачи 13 ЕГЭ по информатике"

244

336

Посмотреть ответы 1

Ответы на вопрос:

Kakady0071

Информатика

4,4(45 оценок)

{на основе формулы арифметической прогессии} var n: integer; begin readln(n); writeln((5+5+5*(n div 5 -1))/2) ; {((a1+a1+d*(n-1))/2)} end. {или перебором без } var i,n,k: integer; s: real; begin k: =0; readln(n); for i: =1 to n do if i mod 5=0 then begin s: =s+i; k: =k+1; end; writeln(s/k) ; end. пример n=100 summa=52.5