Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  1
Language: PASCAL
Code:
program HelloWorld;
var x: real;
begin
  readln(x);
     if x>=-5 then
     if x<=1 then
     write ('принадлежит')
     else
     if x<-5 then
     write ('не принадлежит')
     else 
     if x>=7 then
     if x<=13 then
     write ('принадлежит')
     else
     write ('не принадлежит')
end.     
Comments: