(70 )
1. составить блок-схему алгоритма и программу на паскале для вычисления функций y(x). ввести программу в эвм, вычислить значения
функции и проверить ее. в отчет включить блок-схему алгоритма, текст программы, реакцию эвм.
y(x) = ((sinx? l+a) ea
vь? +с2
var
x, y: integer;
begin
write ('x = ');
readln (x);
if x > 0 then
y := x - 2
else
if x = 0 then
y := 0
else
y := ads (x)
writeln ('y = ', y);
end