Найти среднее геометрическое чисел от a до b - QBasic
Формулировка задачи:
Найти среднее геометрическое чисел от a до b.
Решение задачи: «Найти среднее геометрическое чисел от a до b»
textual
Листинг программы
input "vvedite a ",a input "vvedite b ",b p=1 for i=a to b p=p*i k=k+1 next sred=p^(1/k) print"sred=";sred