Помогите перевести в Паскаль 2 часа уже вожусь!!! СРОЧНО ПРЯМ! ВЗАИМНАЯ БЛАГОДАРОЧКА!
Приложения:
Ответы
Ответ дал:
2
Var x: real;
Begin
readln(x);
If (x>=0)And(x<3)
Then write('y=',sqrt(x+1))
Else
If (x>5)And(x<>7)
Then write('y=',3*x*x-2)
Else write('y=',1/x+4);
End.
fhsdjkfhkjs:
Получилось почти так же, я одно действие только перепутал. Спасибо тебе огромное.
Ответ дал:
0
Ответ:
Объяснение:
Программа:
Приложения:
Вас заинтересует
4 месяца назад
4 месяца назад
11 месяцев назад
11 месяцев назад
2 года назад
2 года назад
7 лет назад
7 лет назад