Запишите значения элементов массива b, сформированного следующим образом:
For i:=1 to 10 do b[i] := a[i] + 5;

program HelloWorld;vari: integer;a, b : array [1..10] of integer;beginwriteln('a[i]: b[i]:'); for i:=1 to 10 do begin a[i]:=random(10); b[i]:=a[i]+5; writeln(a[i],' ',b[i]); end;end.

к сожалению, не сохранилось форматирование, поэтому подкрути самостоятельно пробелы в выводе

ответ даю в комментрарии