Предмет: Информатика,
автор: Sapsano
Написать программу. Язык программирования Fortran. Задача номер 4. Помогите написать и объяснить.
Приложения:
Sapsano:
Я это понял. Ну..хоть что-то получается?
компилятор ищу... они все под винду или платные, или требуют среды дополнительной
ты на люниксе?
Нет, на хрюше
Сейчас, мне один знакомый кинет хороший компилятор. Правда я не знаю куда его тут залить
У тебя есть скайп? так быстрее и проще будет.
я уже играюсь, установил
Хорошо. Просто может правда скооперируемся в скайпе, так легче будет.
Ты с нормального компьютера, свой профиль можешь читать?
Ну да, а что?
Ответы
Автор ответа:
1
program ex4
real::x,y
read *,x,y
if (y<exp(1.) .and. y>exp(-1.) .and. y>x*x) then
print *,"Vnutri"
else if (y<=exp(1.) .and. y>=exp(-1.) .and. y .eq. x*x &
.or. y .eq. exp(1.) .and. y .eq. x*x &
.or. y .eq. exp(-1.) .and. y .eq. x*x) then
print *,"Na granitce"
else
print *,"Vne"
end if
end
real::x,y
read *,x,y
if (y<exp(1.) .and. y>exp(-1.) .and. y>x*x) then
print *,"Vnutri"
else if (y<=exp(1.) .and. y>=exp(-1.) .and. y .eq. x*x &
.or. y .eq. exp(1.) .and. y .eq. x*x &
.or. y .eq. exp(-1.) .and. y .eq. x*x) then
print *,"Na granitce"
else
print *,"Vne"
end if
end
Похожие вопросы
Предмет: Қазақ тiлi,
автор: Bbeaver
Предмет: Русский язык,
автор: лусине555555
Предмет: Русский язык,
автор: MiniCate
Предмет: Информатика,
автор: йцукеныв
Предмет: Математика,
автор: 56464665656565787