№1, вариант 13 (13 вариант)

Посмотреть архив целиком

program lab2

real x,y

1 print*,'enter X and Y'

read(*,*) x,y

if (y>2 .and. y<4*x**2+1) then

print*, 'in the area'

else

if((y<2 .and. y>4*x**2+1) .or. (y>4*x**2+1) .or. (y<2 .and. y<=4*x**2+1))then

print*,'out the area'

else

print*,'on the line'

end if

end if

goto 1

end


Случайные файлы

Файл
72992-1.rtf
176460.rtf
91147.rtf
65835.doc
referat.doc




Чтобы не видеть здесь видео-рекламу достаточно стать зарегистрированным пользователем.
Чтобы не видеть никакую рекламу на сайте, нужно стать VIP-пользователем.
Это можно сделать совершенно бесплатно. Читайте подробности тут.