Вопрос по информатике:
Задан одномерный массив K[n]. Создать одномерные массивы L и M. Массив L будет содержать четные элементы массива K, а массив M - нечетные.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 19.08.2018 17:59
- Информатика
- remove_red_eye 18499
- thumb_up 42
Ответы и объяснения 2
Const n=5;
var k,l,m:array[1..n] of integer;
i,p1,p2:integer;
begin
for i:=1 to n do
read(k[i]); {задаем массив с n=5 елементов}
for i:=1 to n do
if (k[i] mod 2=0) then {Проверяем четное число или нет}
begin
inc(p1); {Если да , то 'кидаем' елемент в массив L}
l[p1]:=k[i];
end
else
begin
inc(p2); {Если нет , то 'кидаем' елемент в массив M}
m[p2]:=k[i];
end;
writeln; {Вывод}
write('Четные:');
for i:=1 to p1 do
write(l[i],' ');
writeln;
write('Нечетные');
for i:=1 to p2 do
write(m[i],' ');
end.
- 21.08.2018 11:41
- thumb_up 15
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.