Форум программистов, компьютерный форум CyberForum.ru

Перевод из Basic на язык С - C++

Восстановить пароль Регистрация
 
Yur4a
Сообщений: n/a
19.01.2013, 11:08     Перевод из Basic на язык С #1
Помогите пожалуйста кто-нибудь, с переводом с Basic на язык С

PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
10 PRINT'УСИЛИТЕЛЬ С ОБЩИМ ИСТОКОМ'
20 INPUT'ВВЕДИТЕ R3,RC,RСИ'R1,R2,R3
30 INPUT'ВВЕДИТЕ RГ,RH,RИ'R4,R5,R8
40 INPUT'ВВЕДИТЕ СЗИ,СЗС,ССИ'C1,C2,C3
45 INPUT'ВВЕДИТЕ С12,СИ'C4,C5,C6
50 INPUT'ВВЕДИТЕ S='S
60 LET R6=R1:LET R7=R3*R2/(R3+R2)
70 PRINT'R ВХОДА='R6:PRINT'R ВЫХОДА='R7
80 LET A=R2*R3*R5/(R2*R3+R2*R5+R3*R5)
90 LET K=(R1/(R1+R4))*S*A:PRINT'KU='K
100 LET K1=S*A:LET T1=(C1+C2*(1+K1))*R4*R1/(R4+R1)
110 LET T2=(C2+C3)*A:LET T3=R4*(C1+C2*C3/(C2+C3))
115 PRINT'TBX='T1,'TВЫХ='T2
120 LET T4=T1+T2:LET M=T3*T2/T4^2
130 PRINT'H(P)=1/(1+P*T4+P^2*T4^2*M),ГДЕ'
140 PRINT'T4='T4:PRINT'M='M
150 LET T5=2.2*T4*SQR(1-2*M):LET D=S/2.2/(C1+C3)
160 PRINT'T НАРАСТАНИЯ='T5:PRINT'ДОБРОТНОСТЬ ПТ='D
170 PRINT'ДЛЯ ОБЛАСТИ БОЛЬШИХ ВРЕМЕН'
180 LET T6=(R4+R1)*C4:LET T7=(R2+R5)*C5
190 LET T8=C6*R8/(R8*S+1)
200 PRINT'ТВХ='T6,'TВЫХ='T7,'T ИСТ.цЕПИ='T8
210 INPUT'ВВЕДИТЕ Т ИМПУЛЬСА='T0
220 LET Z1=T0/T6:LET Z2=T0/T7:LET Z3=0:IF T8>0 THEN LET Z3=T0/T8
230 LET Z=Z1+Z2+Z3
240 PRINT'СПАД ПЛОСКОЙ ВЕРШИНЫ ИМПУЛЬСА Z='Z
250 GOTO 210:END
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.01.2013, 11:08     Перевод из Basic на язык С
Посмотрите здесь:

Перевод из Basic на язык С. C++
C++ Перевод из Visual Basic в С++
Перевод дроби на язык СИ C++
Перевод из Basic в С++ C++
C++ Перевод кода с visual basic на C++
Перевод кода с Basic C++
Перевод формулы на язык C++ C++
Перевод текста в формальный язык C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

Текущее время: 20:07. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru