Вопрос по информатике:
Найти сумму отрицательных, произведение положительных и количесво нулевых элементов в виде блоксхемы
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 05.12.2015 16:44
- Информатика
- remove_red_eye 16203
- thumb_up 38
Ответы и объяснения 1
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 program test; var a:array[0..15] of integer; s,c,p:integer; i:byte; begin s:=0;c:=0;p:=1; //Заполняем значениями for i:=0 to 15 do begin readln(a[i]); if a[i]0 then c:=c+1; if a[i]0 then p:=p*a[i]; end; writeln('Сумма:',s); writeln('Количество:',c); writeln('Произведение:',p); readln(s); end.
- 06.12.2015 02:01
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.