Даны два числа А и В (Аlt;В). Найти произведение всех целх чисел от А до В включительно. Fortran

Question

Даны два числа А и В (А<В). Найти произведение всех целх чисел от А до В включительно. Fortran

Гость

Ответ(ы) на вопрос:

Accepted Answer

program AB integer a,b,i,p read (*,*) a,b p=1 do i=a,b p=p*i enddo write (*,*) p stop end Тестовое решение для ввода 3 8 20160