Recent content by aslevelpascalnoob

I keep just getting 0 for my average everytime i run this with any numbers, pls help program Project1; {$mode objfpc}{$H+} uses SysUtils; type list_of_num=array[1..10] of integer; var x: list_of_num; i: integer; avg: integer; dif: integer; sum: integer; begin i:=1; Sum:=0...