Размещено 1 год назад по предмету
Информатика
от titanikom
составить блок-схему к программе ПАСКАЛЬ
program lab;
var
x, y, u, D, pi,max: real;
begin
write('x, y ');
readln(x, y);
if (x*y)>5 then
u:= -exp(1)
else if (x*y)sin(exp(3*ln(y)))
then max:= exp(4*ln(x))
else max:= sin(exp(3*ln(y)));
D:=ln(u)+sqr(max);
writeln('D', D:10:10);
end.