рефераты бесплатно
 
Главная | Карта сайта
рефераты бесплатно
РАЗДЕЛЫ

рефераты бесплатно
ПАРТНЕРЫ

рефераты бесплатно
АЛФАВИТ
... А Б В Г Д Е Ж З И К Л М Н О П Р С Т У Ф Х Ц Ч Ш Щ Э Ю Я

рефераты бесплатно
ПОИСК
Введите фамилию автора:


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

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

Программа расчета АФЧХ на языке «BASIC»

CLS

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=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


рефераты бесплатно
НОВОСТИ рефераты бесплатно
рефераты бесплатно
ВХОД рефераты бесплатно
Логин:
Пароль:
регистрация
забыли пароль?

рефераты бесплатно    
рефераты бесплатно
ТЕГИ рефераты бесплатно

Рефераты бесплатно, реферат бесплатно, сочинения, курсовые работы, реферат, доклады, рефераты, рефераты скачать, рефераты на тему, курсовые, дипломы, научные работы и многое другое.


Copyright © 2012 г.
При использовании материалов - ссылка на сайт обязательна.