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

Question

Информатика

Савватия

18 июля, 23:35

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

+4

Ответы (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.