Какие из циклов не подходят для параллелизации с использованием опции компилятора /Qparallel
do j=1,100 A(i,2)=B(2,i)*C(i,2)end do
do k=1,M A(k)=B(k+1)*C(k+1)end do
do k=1,1000 V(k)=W(k-1)*S(k) R(k)=X(k)**2-S(k-1) end do
do sum=sum+A(k) val=val-B(k) if (sum > period) exitend do(Верный ответ)
while (cx > eps) do cx=cx+A(k)*B(k) A(k)=C(k)-D(k)end do(Верный ответ)