Вопрос по информатике:
Заполните случайными числами в диапазоне от 1 до 5 два массива: A[1:20] и B[1:20]. Найдите и выведите на экран только те элементы этих массивов, значения которых совпадают. Например, если A[2]=B[2]=4, то на экран надо вывести: Номер: 2 значение: 4 Если совпадений нет, то вывести сообщение об этом. Заранее Спасибо.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 16.05.2015 12:40
- Информатика
- remove_red_eye 6461
- thumb_up 36
Ответы и объяснения 1
const n = 20;
var
a, b: array[1..n] of integer;
i, count: integer;
begin
for i := 1 to n do begin
a[i] := 1 + random(5);
b[i] := 1 + random(5);
if(a[i] = b[i]) then begin
writeln('Номер: ', i, ' Значение: ', a[i]);
inc(count);
end;
end;
if(count = 0) then writeln('Совпадений нет');
end.
- 17.05.2015 21:53
- thumb_up 44
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.