Составьте программу с использованием условного оператора, предусмотрите вариант, когда значение будет выходить за пределы диапазона, в этом случае экран должен очищаться , выводиться подсказка и программа должна возвращаться в начало. условие для программы: cоставьте программу , которая в зависимости от азимута, показываемого стрелкой компаса, определят страны света: север юг, воcток, запад.

{первый вариант} uses crt; label 1; var  a: integer; begin 1: write('введите азимут в градусах: '); readln(a);   if a in [1..89] then writeln('направление: северо-восток');   if a = 90 then writeln('направление: восток');     if a in [91..179] then writeln('направление: юго-восток');     if a = 180 then writeln('направление: юг');       if a in [181..269] then writeln('направление: юго-запад');       if a = 270 then writeln('направление: запад');         if a in [271..359] then writeln('направление: северо-запад');         if a in [0,360] then writeln('направление: север');           if a > 360 then begin             clrscr;             writeln(', введите корректное значение.');             goto 1;             end;           if a < 0 then  begin             clrscr;             writeln(', введите корректное значение.');             goto 1;             end;   end.  { второй вариант} uses crt; label 1; var  a: integer; begin1: write('введите азимут в градусах: '); readln(a); case a of  0,360:     writeln('направление: север');   1..89:     writeln('направление: северо-восток');   90:       writeln('направление: восток');   91..179:   writeln('направление: юго-восток');   181..269: writeln('направление: юго-запад');   270:       writeln('направление: запад');   271..359: writeln('направление: северо-запад');   end; if a < 0 then begin  clrscr;   writeln(', введите корректное значение.');   goto 1;   end; if a > 360 then begin  clrscr;   writeln(', введите корректное значение.');   goto 1;   end;   end. 

Cлазера. запись и считывание осуществляют в аналоговом формате. поверхность носителя разделяют на разделы, которые разделяют данные в цифровом и аналоговых форматах. оптический диск используют одновременно для хранения, записи и воспроизведения аналоговой и цифровой информации на спиральной дорожке. на дорожке изменяющийся рельеф, отражающий изменения звуковых волн от источника аналогового сигнала на слое хранения информации. когда считывают запись оптическим приемником отраженного луча лазера и преобразуют сигнал из оптического в аналоговый, сигнал изменяют согласно длительности и мощности отраженного оптического сигнала на спиральной дорожке носителя. техническим результатом является увеличение объема записанной информации на единицу площади носителя.

Написал, но должен . во-первых, программа принимает текст, независимо от того, сколько строк было введено, и "читать" она перестанет только после ввода символа с кодом 0, напечатать который можно сочетанием клавиш [email  protected] во-вторых, ты выводишь результат в строку, но, на мой взгляд, из-за этого выходит какой-то bull sh****, так что я использую на "write()", а "writeline()". ты же можешь поменять, если критично. код ниже \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ using system; using system.collections.generic; using system.linq; using system.text; namespace kekus3{   class main {   static void main(string[] args) {     string s = ""; char buff;     while ((buff = (char)console. = 0)     s += buff.tostring();       console.writeline();     for (int i = 0; i < s.length; ++i)     if (s[i] > = '0' & & s[i] < = '9')     console.writeline(" {0} элемент - {1}", i+1, s[i]); console.readkey();   }   } } \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ код выше