Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 978 ответов!

РЕБЯТ СРОЧНО ПОМОГИТЕ СДЕЛАТЬ ЛАБОРАТОРНУЮ ПО ИНФОРМАТИКЕ. ПОЖАЛУЙСТА. ОТДАЮ ВСЕ СВОИ ПНК

10-11 класс

Vladabdurashit 06 янв. 2014 г., 16:21:53 (10 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Abndst
06 янв. 2014 г., 17:32:24 (10 лет назад)

var
  x, y: real;

begin
  readln(x);
  if (x < 0) then
    y := sin(x) / cos(x)
  else
    if (x <= 1) then
      y := sqr(e)
    else
      y := x + cos(x);
  writeln(y);
end.

Ответить



Вы находитесь на странице вопроса "РЕБЯТ СРОЧНО ПОМОГИТЕ СДЕЛАТЬ ЛАБОРАТОРНУЮ ПО ИНФОРМАТИКЕ. ПОЖАЛУЙСТА. ОТДАЮ ВСЕ СВОИ ПНК", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.