Информатика, опубликовано 09.01.2019 16:01
составить блок схему
Var A,B,X,Y,Z: Real;
Begin
Write('Введіть X,Y:');
ReadLn(X,Y);
Write('Введите Z:');
Readln(Z);
IF(Xamp;lt;=Z)THEN A:=EXP(1/8*LN(X))+EXP(X+Y)
ELSE B:=ARCSIN(Z)+ABS(X+Y);
WriteLn('Ответ равен');
IF(Xamp;lt;=Z)THEN Write(A)
ELSE Write(B)
End
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01