Какой из фрагментов программы переводит символьное представление года в числовое?
(Отметьте один правильный вариант ответа.)
Варианты ответа
character(128) bufinteger Y,M,Dwrite(buf,"(A)") "2012//05//07"read(buf,"(i4)") Yread(buf,"(i4)") Mread(buf,"(i4)") D
character(128) bufinteger Y,M,Dwrite(buf,"(A)") "2012//05//07"read(buf(1:4),"(i4)") Yread(buf(5:6),"(i4)") Mread(buf(7:8),"(i4)") D
character(128) bufinteger Y,M,Dwrite(buf,"(A)") "2012//05//07"read(buf(1:4),"(i4)") Yread(buf(1:2),"(i4)") Mread(buf(1:2),"(i4)") D
write(buf,"(A)") "2012//05//07"forall (i=1:len(buf),buf(i:i)=='/') buf(i:i)=' 'end forallread(buf,*) Y, M, D
write(buf,"(A)") "2012//05//07"where (buf=='/') buf=' 'end forallread(buf,*) Y, M, D(Верный ответ)