Заполните случайными числами в диапазоне от 1 до 5 два массива: a[1: 20] и b[1: 20]. найдите и выведите на экран только те элементы этих массивов, значения которых . например, если a[2]=b[2]=4, то на экран надо вывести: номер: 2 значение: 4 если совпадений нет, то вывести сообщение об этом. заранее .

Ksenichka777 Ksenichka777    1   20.05.2019 11:10    5

Ответы
roma2233p08v96 roma2233p08v96  13.06.2020 20:44

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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика