Пример 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; просмотров: 920;