# § 1.2 算法基本语句 - PowerPoint PPT Presentation

1 / 11

§ 1.2 算法基本语句. 输入 语句 、 输出 语句 、 赋值 语句 、 条件 语句 、 循环 语句. 输入 语句、 输出 语句和 赋值 语句一般格式是 :. INPUT “ 提示文字 ” ; 变量. 1. 输入 语句 :. 2. 输出 语句 :. PRINT “ 提示内容 ” ; 表达式. 3. 赋值 语句 :. 变量 ＝ 表达式. 4. 条件结构 用 条件语句 , 程序语句来描述 :. IF 条件 THEN 语句 1 ELSE 语句 2 END IF. 否. 满足条件？. 是. 语句 1. 语句 2. IF 条件 THEN

I am the owner, or an agent authorized to act on behalf of the owner, of the copyrighted work described.

§ 1.2 算法基本语句

Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author.While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server.

- - - - - - - - - - - - - - - - - - - - - - - - - - E N D - - - - - - - - - - - - - - - - - - - - - - - - - -

#### Presentation Transcript

§1.2 算法基本语句

INPUT “提示文字”; 变量

1.输入语句:

2.输出语句:

PRINT “提示内容”; 表达式

3.赋值语句:

4.条件结构用条件语句,程序语句来描述:

IF条件 THEN

ELSE

END IF

IF条件 THEN

END IF

Δ=b2－4ac

p= －b/2a

q=SQR(ABS (Δ))/(2a)

Δ≥0?

x1=p+q

x2=p-q

x1=x2?

QBASIC程序：

d = b * b –4 * a * c

p = – b / (2 * a)

q = SQR(ABS(d)) / (2 * a)

IF d >= 0 THEN

x1 = p + q

x2 = p – q

IF x1 = x2 THEN

PRINT “One real root：”；x1

ELSE

PRINT “Two real roots：xl”；x1，”and x2”; x2

END IF

ELSE

PRINT “No real rool.”

END IF

END

INPUT “a，b，c=”；a，b，c

IF b > a THEN

t = a

a = b

b = t

END IF

IF c > a THEN

t = a

a = c

c = t

END IF

IF c > b THEN

t = b

b = c

c = t

END IF

PRINT a，b，c

END

b＞a?

t=a,a=b,b=t

c＞a?

t=a,a=c,c=t

c＞b?

t=b,b=c,c=t

INPUT “a，b，c=”；a，b，c

IF b > a THEN

t = a

a = b

b = t

END IF

IF c > a THEN

t = a

a = c

c = t

END IF

IF c > b THEN

t = b

b = c

c = t

END IF

PRINT a，b，c

END

b＞a?

t=a,a=b,b=t

c＞a?

t=a,a=c,c=t

c＞b?

t=b,b=c,c=t

{

0.25×m

y=

0.25×50+0.25×(m－50)

0.25×50+0.35×50+0.45×(m－100)

2. 铁路运输托运行李，从甲地到乙地，规定每张客票托运费计算方法是：行李质量不超过50kg时，按0.25/kg元计算；超过50kg而不超过100kg时，其超过部分按0.3元/kg计算，超过100kg时，其超过部分按0.45元/kg计算，编写程序，输入行李质量，计算并输出托运的费用，并画出程序框图。

INPUT “m=”;m

IF m<=50 THEN

y=m﹡0.25

m≤50?

ELSE

IF m<=100 THEN

m≤100?

y=0.25﹡50+0.35﹡ (m－50)

ELSE

y=0.25×50+0.35×

50+0.45×(m－100)

y=0.25×50+

0.35×(m－50)

y=m×0.25

y=0.25﹡50+0.35﹡50+

0.45﹡ (m－100)

END IF

END IF

PRINT “y=”;y

END

G<=50

M=0.53*G

M=50*0.53+0.85*(G-50)

3、某快递公司规定甲、乙两地之间物品的托运费用根据下面的方法计算：物品重量在50千克以内，托运费为每千克 0.53 元，超过的话，超过部分每千克0.85元，试画出计算费用f的程序框图，并写出相应的QBASIC程序。

INPUT “输入重量G=”；G

IF G<=50 THEN

M=0.53*G

ELSE

M=50*0.53+0.85*(G-50)

END IF

PRINT “运费为：”；M

END