Вопрос по информатике:
1) Массив из 30 элементов. Посчитать отдельно среднее арифметическое положительных и отрицательных
2) Посчитать количество нечетных элементов массива.
Совсем не понимаю информатику, пожалуйста, помогите с этими задачами! :С
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 09.04.2017 05:39
- Информатика
- remove_red_eye 13589
- thumb_up 14
Ответы и объяснения 1
Const
N:=30
var
a: array [1...N] of integer;
i, p, o, k1, k2: integer;
begin
for i :=1...N do
readln(a[i]);
k1:=0;
k2:=0;
p:=0;
o:=0;
for i :=1...N do
if a[i]>0 then begin
p:=a[i]+p;
k1:=k+1;
end;
else
o:=a[i]+o;
k2:=k2+1;
writeln(p/k1)
writeln(o/k2)
end.
2)const
N:=30
var
a: array [1...N] of integer;
k_n: integer;
begin
for i :=1...N do
readln(a[i]);
if a[i] mod 2 >0 then
k_n:=k_n+1;
writeln(k_n);
end.
- 01.01.1970 00:00
- thumb_up 18
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.