Вопрос по информатике:
Заполните случайными числами в диапазоне от 1 до 5 два массива: А[1:20] и В[1:20]. Найдите и выведите на экран только те элементы этих массивов, значения которых совпадают. Например, если А[2]=В[2]=4,то на экран надо вывести: Номер: 2 значение: 4.Если таких совпадений нет, то выведите на экран сообщение об этом.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 04.03.2015 13:51
- Информатика
- remove_red_eye 4665
- thumb_up 39
Ответы и объяснения 1
Var a, b :array [1..20] of integer; i :integer; f :boolean;
begin
randomize; for i:= 1 to 20 do begin a[i]:= random(5); b[i]:= random(5); end; f:= false; for i:= 1 to 20 do if a[i] = b[i] then begin f:= true; writeln('Номер: ',i,' значение: ',a[i]); end; if f = false then writeln('Совпадающих элементов нет!');
end.
- 05.03.2015 01:24
- thumb_up 46
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.