ÇãÇ ÇÐÇ ÇÚØÇß ÇáÓÄÇá ßãÇ íáí
ÇßÊÈ ÈÑäÇãÌ áÍÓÇÈ ãÌãæÚ ÇáÇÚÏÇÏ ÇáÊì ÊÞÈá ÇáÞÓãÉ Úáì 3 ãä ÇáÇÚÏÇÏ ÇáÊÇáíÉ
(12æ20æ15æ2æ40æ60) ãËáÇ åíßæä ÇáÈÑäÇãÌ ßãÇ íáí
10 rem this program for num
20 sum=0
30 for i = 1 to 6 (áÇä ÚäÏß ÓÊ ÇÚÏÇÏ ÝÞØ)
40 READ X
50 Y= X/3
60 if Y= int (X/3) then 60
70 sum = sum + x
80 next i
90 mean =sum / 3 (áÇÍÙ Çä ÇáÇÚÏÇÏ ÇáÊì ÊÞÈá ÇáÞÓãÉ Úáì 3 3ãä ÇáÇÑÞÇã ÇáãæÌæÏÉ3 ÇÑÞÇã ÝÞØ)
100 print sum , mean
110 DATA 12 , 20, 15 ,2 ,40 ,60