Question

uses crt;
var x,y,result: real;
begin
readln(x,y);
result:=cos(x)/pi-2*x+16*x*cos(x*y)-2;
writeln(result:7:4);
end.



Пожалуйста напишите блок-схему!

Answer 1

Блок-схема находится во вложении