Вопрос по информатике:
Последовательно
вводятся N целых чисел. Определить, каких среди них чисел
больше: положительных или отрицательных.
Нужно построить блок-схему, заранее спасибо
- 24.04.2017 06:28
- Информатика
- remove_red_eye 8119
- thumb_up 88
Ответы и объяснения 1
Const
N = 10; //твое число N
var
i,c,nc,X: integer;
begin
for i:=1 to N do
begin
READLN(X);
if(X >= 0) then inc(c)
else inc(nc);
end;
if (c > nc) then Writeln('четных больше')
else
begin
if(c < nc) then Writeln('нечетных больше')
else if(c = nc) then writeln('кол-во четных и нечетных чисел равно');
end;
end.
- 25.04.2017 09:03
- thumb_up 48
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.