Заменить простые числа в массиве их номерами - Pascal ABC (12878)
Формулировка задачи:
Заменить простые числа в массиве их номерами (pascal)
Помогите пожалуйста срочно надо сделать работу.
Решение задачи: «Заменить простые числа в массиве их номерами»
textual
Листинг программы
for j:=1 to n do if IsPrime(a[j]) then a[j]:=j;