Ввести два массива, состоящие из разного количества элементов. Найти, на сколько элементов один массив больше другого.

Question

Информатика

Глорибза

21 ноября, 20:20

Ввести два массива, состоящие из разного количества элементов. Найти, на сколько элементов один массив больше другого.

+3

Ответы (1)

Знаете ответ на вопрос?

Гордей · Answer 1

Program z1;

const nmax[100];

var a, b:array of integer[1 ... nmax];

var i, j:integer;

begin

i=1;

while not eol do

begin

read (a[i]) ;

i++;

end;

readln () ;

j=1;

while not eol do

begin

read (a[j]) ;

j++;

end;

write (abs (j-i)) ;

end.