Предмет: Информатика, автор: Полуотличник

 ПОМОГИТЕ ПОЖАЛУЙСТА ВООБЩЕ ГОРЮ!!!!!!!!! НАЙДИТЕ СУММУ НЕЧЁТНЫХ ЧИСЕЛ ИЗ ПРОМЕЖУТКА ОТ 11 ДО 99!!!!!! ЭТО НАДО НА ПАСКАЛЕ НАПИСАТЬ!!!!!!!! НАЙТИ СРЕДНЕЕ АРИФМЕТИЧЕСКОЕ ЧИСЕЛ ОТ 1 ДО 50!!! ТОЖЕ НА ПАСКАЛЕ НАПИСАТЬ!!!!!! ПОЖАЛУЙСТА!!!! ПОМОГИТЕ!!!!!!!!!!!1

Ответы

Автор ответа: Miras07
0

1)

var s,i:integer;

begin

s:=0;

for i:=11 to 99 do

if i mod 2 = 1 then s:=s+i;

writeln(s);

end.

 

2)

var s,i:integer;

begin

s:=0;

for i:=1 to 50 do

s:=s+i;

writeln(s/50);

end.

 

Вопросы недочеты в ЛС

Похожие вопросы
Предмет: Биология, автор: zansaiakurmetova
Предмет: Биология, автор: artemartemartem