Блок-схема

1 Начало

Ввод (a, b, h)

3 n=[(b-a)/h]

4 i=0, n

5 x=a+i*h

6 y=x

Вывод (x,y)

Конец

 

Пример 6.3 (Продолжение).

Program PR_6_3;

var a,b,h,x,y:real; i,n:integer;

begin

writeln('vvedite a,b,h');

read(a,b,h);

n:=trunc((b-a)/h); {zelaja tschast veschestvennogo tschisla}

for i:=0 to n do

begin

x:=a+i*h;

y:=x;

writeln('x=',x:6:2,',','y=',y:6:2)

end.

 

Пример 6.3 (Продолжение).

1) Объяснить работу программы.

2) Объяснить назначение блоков 1- 8 блок-схемы.

3) Провести вычисления и построить функцию y=x при следующих значениях а, b, h :

A b h

-3 3 1

-3 3 0.5

-3 3 0.3

 

 

Циклы без счетчика.

Оператор WHILE (while)

while <логическое выражение> do < оператор> ;

Оператор Repeat … Until

Repeat (повторять) … Until (до тех пор, пока)

Repeat

< оператор 1>

…

< оператор n>

Until <логическое выражение>

 

Пример 6.4 Вычислить значения и построить функцию y=f(x)
на отрезке [a, b] c шагом h , если y=x*x .
.

Блок-схема

1 Начало