Пример 1. x [0;10] Составить блок-схему алгоритма и программу с помощью оператора «FOR»:
x [0;10]
|
| начало |
| R, a, l, b |
| X=0, 10 |
|
| y |
| конец |
| Program Tiko; var y, a, R, l, b: real; x: integer; begin writeln (‘a=’); readln (a); writeln (‘R=’); readln (R); writeln (‘l=’); readln (l); writeln (‘b=’); readln (b); For x:=0 to 10 do begin Y:=a*exp(-b*x)*sin(R*x+ l); writeln (‘y=’, y:9:2); end; readln; end. |
Дата добавления: 2014-12-03; просмотров: 978;

[0;10]