Задать вопрос Регистрация
Помочь другим

  • найти сколько элементов одномерного массива А встречаются в одномерном массиве В паскаль

     

Ответы 1

  • var a,b:array [1..100] of integer;an,bn,i,j,n:integer;Begin    read(an,bn);    for i:= 1 to an do        read(a[i]);    for i:= 1 to bn do        read(b[i]);    for i:= 1 to an do        for j:= 1 to bn do            if a[i]=b[j] then n:=n+1;    writeln(n);End.

    • Автор:

      wang
    • 5 лет назад
    • 0

  • Добавить свой ответ

Еще вопросы

Топ пользователей

Войти через Google

 или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years