{* Задача40 *}

REM basic

' Составить программу вычисления суммы окладов 5 рабочих


10   Dim A(5)
20   For I=1 To 5
30   INPUT A(I)
35   PRINT “A(”,I;”)=”;A(I)
40   S=S+A(I)
50   Next    I 
60   PRINT   S
70   End