Найдите сумму нечетных чисел от а до 100, а вводится с клавиатуры (Pascal ABC)

125

305

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

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

diasashat11

Информатика

4,7(9 оценок)

Описание прямо-таки минималистично. буду считать, что 4 четверти, а оценка - есть среднее арифметическое, тогда: var oc,soc,n,i: integer; begin readln(n); //узнаём кол-во "четвертей" for i: =1 to n do begin readln(oc); soc: =soc+oc; end; writeln(round(soc/n)); end. намудрил, конечно, но первое, что пришло в голову.