Задать вопрос
1 августа, 09:17

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

+4
Ответы (1)
  1. 1 августа, 09:53
    0
    Program zadanie;

    Var x, y:real;

    Begin

    Writeln ('Введите значение x') ;

    readln (x) ;

    y:=sqrt (1-sin (x)) ;

    Writeln ('cos (x) = ', y) ;

    End.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дан синус найти косинус, записать через программу pascal ABС ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы