Составить программу

вычислить значение выражения по формуле (все переменные принимают вещественные значения) : Z=корень 1-sina

Question

Астра

25 июля, 09:09

+4

Ответы (1)

Знаете ответ на вопрос?

Мануил · Answer 1

Var

z, a:real;

begin

writeln ('Vvedite a') ;

readln (a) ;

z:=sqrt (1-sin (a)) ;

writeln ('resultat ', z)

end.

Составить программувычислить значение выражения по формуле (все переменные принимают вещественные значения) : Z=корень 1-sina