Новости Словари Конкурсы Бесплатные SMS Знакомства Подари звезду
В нашей
базе уже
59876
рефератов!
Логин

Пароль

Автоматизация линии производства кормовой рыбной муки

Автоматизация линии производства кормовой рыбной муки.
Автоматизация линии производства кормовой рыбной муки Программа расчета АФЧХ на языке «BASIC»


SCREEN 12
WINDOW (0, 480)-(640, 0)
oo=1: y=0: r=0
FOR T=80 TO 160 STEP 20
y=0
FOR t=80 TO .1 STEP .03
re=(.32*COS(40*w)-64*w*SIN(40*w))/(40000*w^2+1)
im=-(.32*SIN(40*w)+64*w*COS(40*w))/(40000*w^2+1)
PRINT USING «###.####»; w;
PRINT « »;
PRINT USING «###.####»;40000*w^2+1;
PRINT « »;
PRINT USING «###.####»;.32*COS(40*w);
PRINT « »;
PRINT USING «###.####»;64*w*SIN(40*w);
PRINT « »;
PRINT USING «###.####»;.32*SIN(40*w);
PRINT « »;
PRINT USING «###.####»; 64*w*COS(40*w);
PRINT « »;
PRINT USING «###.####»; re;
PRINT « »;
PRINT USING «###.####»;im
oo=oo+1: k=k+1
y=0: r=r+.1: y=y+1
a=SQR(re*re+im*im)
IF w=0 THEN w=.00001
b=(a/w*t))
IF w>.3 OR w<.06 THEN GOTO 10
IF y>=2+r AND t=1 AND w<.179 THEN
END IF
10
PSET (400+re*700, 430+700*im)
NEXT w: y=0 NEXT t
END
Умар.Ш. был тут !!!!!
 
давайте изгоним мат !!!
 
ДОБРОЙ НОЧИ ОТ Ъ
ЛОКИ ИНО
 
ДМК МЭ
 
где инфааа?