Нахождение произведения суммы - QBasic
Формулировка задачи:
http://www.cyberforum.ru/attachments/459990d1417217846 помогите в бэйсике полный 0
Решение задачи: «Нахождение произведения суммы»
textual
Листинг программы
CLS p=1 FOR a=1 TO 5 summ=0 FOR b=1 TO 10 summ=summ+COS(a*b) NEXT b p=p*summ NEXT a PRINT p END