Курсовая работа: Основы программирования и алгоритмизации

begin

read (f,a[j]);

write (a[j],' ');

end;

close (f);

writeln;

end.

Решение: