Помогите со 2 заданием 5 варианта ( Паскаль)

+263 голосов
3.5m просмотров

Помогите со 2 заданием 5 варианта ( Паскаль)

Информатика | 3.5m просмотров
Дан 1 ответ
+71 голосов

Ответ:

  • var x,y:real;
  • begin
  • read(x);
  • if x
  • else y:=cos(x);
  • write(y);
  • end.

или:

  • begin
  • var x := ReadInteger('x:');
  • Print('y:',x<=0?x+3:cos(x));</li>
  • end.

Пример работы:

(3.7k баллов)
Похожие задачи