Дан синус найти косинус,записать через программу pascal abс

alibna alibna    3   28.05.2019 06:50    1

Ответы
Reizon Reizon  25.06.2020 17:12
Program zadanie;
 Var x,y:real;
Begin
 Writeln('Введите значение x');
 readln(x);
 y:=sqrt(1-sin(x));
 Writeln('cos(x)=',y);
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика