Question

Дано 30 чисел подсчитать сумму отрицательных чисел
Если можно через Qbasik

Answer 1

Qbasic значит...

For i=1 to 30
Input a                                    -вводим число
if a<0 then s=s+a                    -проверка
Next
? s
Понятно?