Qbasic klavyeden okunan 2 sayı arasındaki sayıların adedini toplamını ve ortalamasını bulma

İki sayının toplamını yaptım, ama adedini ve ortalamasını yapamadım. Yardım eder misiniz? O iki işlemi nasıl yaptıracağım?

CLS.

Toplam=0.

Input “ıkı sayı girin”,b, s.

For ı=b to s.

Toplam=toplam+ı.

Next'i.

Prınt b; s; “arasındaki sayıların toplamı=”;toplam.