Пожаловаться
- 14.12.2017 10:08
- Информатика
- remove_red_eye 5817
- thumb_up 27
Ответы и объяснения 1
Program asd;
Var
x,y:real;
Begin
Write('x= ');
Readln(x);
If (x<=0)
then y:=x+2
else
If (x>0) and (x<3)
then y:=-x+2
else
If (x>=3)
then y:=-2;
Writeln('y= ',y);
End.
Тестовые значения:
x= 5
y= -2
Пожаловаться
- 15.12.2017 17:54
- thumb_up 40
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы