Составить программу контроля введенного значения переменных...

@LastQuinsy · Регистрация: 05.03.2012

Author24 — интернет-сервис помощи студентам

Составить программу контроля введенного значения переменных в пределах от -20 до -10 и от 111 до 222.

help. не могу понять как прописать две переменные в одном цикле, или дать два значения одной переменной, или как сделать цикл в цикле while...

Добавлено через 5 минут
хотел так прописать...

Pascal

 
while (n<-20) or (n>-10) do
 begin
  while (n<111) or (n>222) do
   begin
    write (' ')
   end
 end

но понимаю что таким способом присваиваю одно другому...

@Севак · 21.03.2012, 21:18

LastQuinsy,

Pascal

1	...while ((n>=-20) and (n<=10)) or ((n>=111) and (n<=222)) do...

@LastQuinsy · 22.03.2012, 13:53 **[ТС]**

в такой ситуации цикл не разу не запускается и любое число удовлетворяет программу, а мне нужны числа только от -20 до -10 а также от 111 до 222...

вот как полностью все выглядит

Pascal

program lab;
 uses crt;
 var n:integer;
begin
 clrscr;
 write ('Vvedite znachenie peremennoi v promejytke ot -20 do -10 ili ot 111 do 222.');
 read (n);
  while (n>-20) and (n<-10) or (n<111) and (n>222) do
   begin
    write ('Neverno vvedennoe znachenie peremennoy. ');
    write ('Vvedite znachenie peremennoi v promejytke ot -20 do -10 ili ot 111 do 222.');
    readln (n)
   end;
 write ('Vvedennoe znachenie peremennoi =',n);
 readln
end.

Добавлено через 16 часов 18 минут
может кто нибудь подсказать что делать?...

@ermolay · 22.03.2012, 14:02

скобочки забыли, У Севака двойные между or.
можно еще так

Pascal

1
2
3

repeat
...
until (n in [-20..-10])or(n in [111..222])

@LastQuinsy · 22.03.2012, 17:38 **[ТС]**

спасибо, все работает...

@LastQuinsy 0 / 0 / 0 Регистрация: 05.03.2012 Сообщений: 11
	22.03.2012, 17:38 [ТС]	5
	спасибо, все работает... 0