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

Var a,b: array[0..19] of Integer;
i: Integer;
begin
for i:=0 to 19 do
begin
a[i]:=random(5)+1;
b[i]:=random(5)+1;
end;
for i:=0 to 19 do
begin
if a[i]=b[i] then writeln('Номер: ',i,', значение: ',a[i]);
end;
end.