Помогите пожалуйста в qbasic надо программу составить)
Приложения:
Ответы на вопрос
Ответил infor5
0
cls
pi=3.141592
for x=0 to 180 step 10
y=x * pi /180
print x, sin(y), cos(y), tan(y)
if tan(y)<>0 then print 1/tan(y) else print "не существ"
next
end
pi=3.141592
for x=0 to 180 step 10
y=x * pi /180
print x, sin(y), cos(y), tan(y)
if tan(y)<>0 then print 1/tan(y) else print "не существ"
next
end
Новые вопросы