VB題計算分段函式急,用vb編寫一段計算分段函式

2021-12-20 13:59:45 字數 6276 閱讀 5870

1樓:匿名使用者

答案選擇c

如果b對的話,當x=5時,y=1;這是不對的。

答案選擇c

2樓:baby楊穎時代

5657837567568

vb問題。用select case語句方法寫出分段函式?

3樓:匿名使用者

private sub command1_click()dim x as integer, y as doublex = val(inputbox("enter data x:"))select case x

case is > 20

y = x ^ 2 + 3 * x + 2case is >= 10 and x <= 20y = sqr(3 * x) - 2

case is > 0 and x < 10y = 1 / x + abs(x)

end select

print format(y, "#.0000")end sub

用vb編寫一段計算分段函式

4樓:匿名使用者

x=val(inputbox("請你輸入x的值")if x<0 then

y=1-2*x

else

y=1+x

end if

print y

vb編寫程式,計算分段函式

5樓:老牛帶你看奇聞

在窗體上放一個命令按鈕,將**複製到窗體裡,程式執行單擊一次命令按鈕可輸入一次n的值

**如下:

private sub command1_click()dim n, y as single

n = inputbox(" 請輸入n的值")select case n

case is < 0

y = 2 * n + 5

case 0

y = 0

case is > 0

y = 3 * n - 1

end select

msgbox "y=" & y

end sub

6樓:在世貿天階灌籃的高飛燕草

看我的一行

private sub command1_click()dim n, y as single

n = inputbox(" 請輸入n的值")y = iif(x<0,2 * n + 5,iif(x = 0,0,3 * n - 1))

msgbox "y=" & y

end sub

7樓:軍廣英綦錦

這位仁兄是個新手吧!彆著急,慢慢來!加油!

dimn,yas

integerifn

<0theny=

3*n+

2elseifn=

0theny=

0elseif

n>0theny=

2*n-

1endif

8樓:韌勁

dim x as integer

if x < 0 then

elseif x >= 0 and x < 10 thenelseif x >= 10 and x < 30 thenelseif x >= 30 and x < 50 thenelse

end if

怎麼用vb編碼計算分段函式

9樓:反倒是屠禮品

#include

int main()

{int x,y;

scanf("%d",&x);

if(0

該程式的分段函式如下:

f(x)=3x+2  (0

f(x)=1         (x=0)

f(x) = x*x    (x<0)

如果輸入x值不再取值範圍內,列印go die...

學好程式設計最重要的是自己要思考,要想。不然沒有任何進步。

求一分段函式vb**,題目請看問題補充。

10樓:

function fun(x as integer)if x < 1 then

fun = x

elseif x < 10 and x >= 1 thenfun = 3 * x - 2

elseif x >= 10 then

fun = 4 * x - 12

end if

end function

function fun(x as integer)select case x

case is < 1

fun = x

case is < 10

fun = 3 * x - 2

case is >= 10

fun = 4 * x - 12

end select

end function

select case 寫範圍的比較少,邊界不是太確定,大致結構就是如此了

vb中怎麼程式設計計算分段函式

11樓:扶桑看天

dim x as integer

if x < 0 then

elseif x >= 0 and x < 10 thenelseif x >= 10 and x < 30 thenelseif x >= 30 and x < 50 thenelse

end if

關於vb中兩個變數的分段函式問題

12樓:設計營地

function def(x as integer, y as integer) as integer

if x = 2 and y <= 400 thendef = 4

end if

if x = 2 and y <= 250 thendef = 3

end if

if x = 2 and y <= 150 thendef = 2

end if

if x = 2 and y < 100 thendef = 1

end if

if x = 1 and y >= 80 thendef = 46

end if

if x = 2 and y > 400 thendef = 5

end if

end function

兩個邏輯關係連起來,80 <= y < 100,是或的關係。只要其中一個條件滿足,就為真。

也就是if x = 2 and 80 <= y < 100 thendef = 1

end if

if x = 2 and 100 < y <= 150 thendef = 2

end if

if x = 2 and 150 < y <= 250 thendef = 3

end if

if x = 2 and 250 < y <= 400 thendef = 4

end if

這些條件都滿足,最後def = 4。

13樓:陽光上的橋

這樣寫判斷條件是錯誤的:

80 <= y < 100

應該修改為:

80 <= y and y < 100

14樓:匿名使用者

病情分析:

你好!!你不能稱作是青黴素類藥物,青黴素屬於β-內醯胺類:這是品種最多,用得最多,最廣的一類,此類包括兩部分.

①青黴素:常用的品種有青黴素鈉,青黴素鉀,氨苄西林鈉,阿莫西林,哌拉西林,青黴素v鉀等.②頭孢菌素:

常用品種有頭孢氨苄,頭孢羥氨苄,頭孢唑啉鈉,頭孢拉定,頭孢曲松鈉等.

指導意見:

用藥前必須進行青黴素皮試,陽性反應者禁用. 口服青黴素等其他藥品也一定是對青黴素者不過敏的才可以 的.一定要在醫師指導下應用.

病情分析:

青黴素的種類很多,分合成的,及提純的兩類.如阿莫西林.阿洛西林,氨苄西林,苯唑西林等十幾種.

指導意見:

青黴素使用前要求做過敏使用.主要是靜脈輸液或肌注時是必做的.一般***很小,合成青黴素***較大,如消化道反應,過敏,腎毒性,血液系統毒性等.

根據不同藥物***也不同.最常用的青黴素是生物提純的,***最小.可以參考具體藥物的說明書.

病情分析:

新型青黴素按功用分以下幾類:

指導意見:

(1)耐青黴素酶類半合成青黴素:主要包括甲氧西林,萘夫西林,苯唑西林,氯唑西林,雙氯西林,氟氯西林等.此組青黴素耐青黴素酶,對金葡菌有良好抗菌作用,對其他細菌活性還遜於青黴素.

其中雙氯西林和氟氯西林抗金黃色葡萄球菌的作用最強,比苯唑西林,氯唑西林強50%~100%.

(2)廣譜半合成青黴素:包括氨苄青黴素,海他西林,美坦西林等,此外阿莫西林,依匹西林,環己西林等,這類藥除了與青黴素g有相同抗菌譜外,對沙門菌屬,大腸桿菌,志賀菌屬等革蘭氏陰性桿菌也有良好的抗菌作用.

(3)對綠膿桿菌有活性的半合成青黴素類:包括羧苄西林,磺苄西林鈉,替卡西林及5個脲基青黴素:阿洛西林,美洛西林,呋苄西林,哌拉西林鈉和阿帕西林.

這些均對綠膿桿菌及其他假單胞菌有良好作用,其中脲基青黴素的抗菌作用較強.

(4)抗革蘭氏陰性菌的青黴素類:包括:美西林,匹美西林,替莫西林等.主要對大腸桿菌科細菌有良好作用,對革蘭氏陽性菌,綠膿桿菌和類桿菌屬多無抗菌活性.

病情分析:

禁忌症: 有青黴素類藥物過敏史或青黴素**試驗陽性患者禁用.

指導意見:

青黴素藥物有青黴素,氨苄青黴素,青黴素v,阿莫西林,氯唑青黴素等

病情分析:

你好,青黴素類的藥物有很多,如青黴素g類:包括青黴素g鉀,青黴素g鈉,長效西林等. 青黴素v類:

青黴素v鉀等.耐酶青黴素:如苯唑青黴素(新青ⅱ號),氯唑青黴素等.

廣譜青黴素:如氨苄青黴素,羥氨苄青黴素等. 抗綠膿桿菌的廣譜青黴素:

如羧苄青黴素,氧哌嗪青黴素,呋苄青黴素等.另外還有氮咪青黴素.

指導意見:

部分人使用青黴素會引起過敏反應,甚至造成嚴重的休克而導致死亡.青黴素使用時是沒什麼大的禁忌的.注意不要飲酒就可.

病情分析:

青黴素的作用是抗菌消炎.對化膿性的炎症效果很好.

指導意見:

青黴素類藥物阿莫西林的膠囊,顆粒.片.安卞西林.先鋒類的藥物只要對青黴素過敏都不可以用.

病情分析:

新型青黴素按功用分以下幾類:

(1)耐青黴素酶類半合成青黴素:主要包括甲氧西林,萘夫西林,苯唑西林,氯唑西林,雙氯西林,氟氯西林等.此組青黴素耐青黴素酶,對金葡菌有良好抗菌作用,對其他細菌活性還遜於青黴素.

其中雙氯西林和氟氯西林抗金黃色葡萄球菌的作用最強,比苯唑西林,氯唑西林強50%~100%.

(2)廣譜半合成青黴素:包括氨苄青黴素,海他西林,美坦西林等,此外阿莫西林,依匹西林,環己西林等,這類藥除了與青黴素g有相同抗菌譜外,對沙門菌屬,大腸桿菌,志賀菌屬等革蘭氏陰性桿菌也有良好的抗菌作用.

(3)對綠膿桿菌有活性的半合成青黴素類:包括羧苄西林,磺苄西林鈉,替卡西林及5個脲基青黴素:阿洛西林,美洛西林,呋苄西林,哌拉西林鈉和阿帕西林.

這些均對綠膿桿菌及其他假單胞菌有良好作用,其中脲基青黴素的抗菌作用較強.

(4)抗革蘭氏陰性菌的青黴素類:包括:美西林,匹美西林,替莫西林等.主要對大腸桿菌科細菌有良好作用,對革蘭氏陽性菌,綠膿桿菌和類桿菌屬多無抗菌活性.

指導意見:

發現過敏反應及時救治青黴素類獸藥用於動物肌體一般無不良反應,但對個別家畜偶見有過敏反應,嚴重的可產生過敏性休克.易過敏家畜以馬,騾,豬,犬等多見,注射後不久出現流汗,興奮不安,肌肉震顫,心跳加快,呼吸困難,站立不穩,抽搐等症狀.因此,在用藥過程中應注意觀察,如出現過敏反應,應立即停止用藥,同時,用腎上腺素或地塞米松進行搶救.

青黴素鉀鹽不宜靜脈注射青黴素鉀鹽應肌肉注射,在使用時還應注意動物的血鉀變化,一般禁止大量使用,特別對高血鉀病畜禁用.

避免空腹時使用青黴素類獸藥不宜在病畜空腹時注射,以免引起昏厥.

不可隨意加大劑量大劑量或超大劑量使用青黴素類獸藥,可干擾凝血機制而造成出血或引起中樞神經系統中毒,引起動物抽搐,大小便失禁,甚至癱瘓等症狀.也可使耐藥菌迅速誘導產生分解青黴素的β-內醯胺酶.

青黴素類獸藥應即溶即用由於青黴素類藥物的水溶液不穩定,在室溫下溶解的時間越長,其效價就越低,致敏物質也不斷增加.所以應做到即溶即用,以確保藥效.

注意配伍禁忌磺胺類鈉鹽與青黴素混合,會使青黴素失效;青黴素與慶大黴素合用,會使慶大黴素失效;青黴素與四環素,氯黴素,碳酸氫鈉,維生素c,阿托品,氯丙嗪等混合使用,也會失效.

vb編寫程式計算如下分段函式並輸出結果其中值

dim x as integer inputbox 請輸入值 dim result as integer 你的計算 msgbox result 1 vb6.0編寫程式,計算下列分段函式,要求輸入x的值,輸出y的值。30分,其中介面設計詳細全面2分 1 編 來寫程式,計算下列分段源函式,要求輸入x的值...

VB中EOF函式怎麼用?它有什麼用?急用謝謝啊

是否到檔案結尾,是則返回true,反之返回false例子 讀出 1檔案的所有內容到text1中dim s as string,str as strings do until eof 1 注意,這裡不可以用 1line input 1,str s s str vbcrlf loop text1.tex...

用VB編寫程式,求S A B C ,階乘的計算分別用Su

1 用sub實現的過程bai 如下 du dim a,b,c,s a 1b 2 c 3s 0 sub jc x dim v v 1while x 0 v v x x x 1 wend s s v end sub jc a jc b jc c msgbox s 2 用function的過程zhi如下 ...