Нужна по программированию. желательно, чтобы в бейсике. мне необходимо найти среднее значение некоторых чисел, значение которых известно, с точностью до , . : э

MS DOS QBasic 1.0

CLS
INPUT "n=", n
PRINT ">";
s = 0!
FOR i = 1 TO n
   INPUT ""; t
   s = s + t
NEXT
PRINT "m=";
PRINT USING "###.#"; s / n

#include <iostream>
#define NUM 10

int main(){
  float arr[NUM];
   for (int i = 0;i < NUM;++i){
       std::cout << "Введите число:"
       std::cin >> arr[i];
    }
   
    int total = 0;
    for (int i = 0;i < NUM;++i){
        total += arr[i];
     }
     total /= NUM;
     std::cout << std::endl << "Среднее арифметическое" << total;
     return 0;
}