Регистрация
Войти
Стать экспертом Правила
Информатика

Задание во вложенииНапишите программу(для Pascal) для данного выражения:(под номером 4)

ОТВЕТЫ



begin
  var x:=ReadReal('x=');
  var A:=x>0?sin(x):x=0?0.0:cos(x);
  Writeln(A)
end.
478
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам