ilyushin-e
?>

Вывести на экран числа от a до b, если a> b ( через оператор for и через оператор while)

Информатика

Ответы

grachevakaterina
Var a,b,k: integer; begin read(a,b); k: =a-1; if a> b then do  while k< > b do begin write(k); k: =k-1; end; end.
mkovanov
1. #include < iostream> using namespace std; void main() {       //задаём язык для консоли       setlocale(lc_all, "russian");       long sum = 0;       int a;       cout < < "введите a" < < endl;       cin > > a;       if (a > 500)       {             cout < < "а > 500" < < endl;       }       else       {             sum = (500 * 501 / 2) - ((a - 1) * a ) / 2;             cout < < sum;       } } 2. #include < iostream> using namespace std; void main() {       //задаём язык для консоли       setlocale(lc_all, "russian");       double average = (1 + 1000) / 2.;       cout < < "среднее арифметические чисел от 1 до 1000" < < average < < endl; } 3 #include < iostream> using namespace std; void main() {       //задаём язык для консоли       setlocale(lc_all, "russian");       int a = 0, b = 0;       cout < < "введите границы диапазона" < < endl;       cin > > a > > b;       cout < < "все числа: " < < endl;       if (a < = b)       {             for (int i = a; i < = b; i++)             {                   cout < < i < < endl;             }       }       else       {             for (int i = b; i < a; i++)             {                   cout < < i < < endl;             }       }       cout < < "чётные числа: " < < endl;       if (a < = b)       {             for (int i = a; i < = b; i++)             {                   if (i % 2 == 0)                   {                         cout < < i < < endl;                   }             }       }       else       {             for (int i = b; i < a; i++)             {                   if (i % 2 == 0)                   {                         cout < < i < < endl;                   }             }       }       cout < < "нечётные числа: " < < endl;       if (a < = b)       {             for (int i = a; i < = b; i++)             {                   if (i % 2 ! = 0)                   {                         cout < < i < < endl;                   }             }       }       else       {             for (int i = b; i < a; i++)             {                   if (i % 2 ! = 0)                   {                         cout < < i < < endl;                   }             }       }       cout < < "числа, кратные 7: " < < endl;       if (a < = b)       {             for (int i = a; i < = b; i++)             {                   if (i % 7 == 0)                   {                         cout < < i < < endl;                   }             }       }       else       {             for (int i = b; i < a; i++)             {                   if (i % 7 == 0)                   {                         cout < < i < < endl;                   }             }       } } 4.  #include < iostream> using namespace std; void main() {       //задаём язык для консоли       setlocale(lc_all, "russian");       int a = 0, sum = 0;       cout < < "введите числа" < < endl;       while (true)       {             cin > > a;             if (a == 0)             {                   break;             }             sum += a;       }       cout < < "сумма =" < < sum < < endl; }
emilbadalov

Відповідь:

uses crt;  {модуль CRT, для красоты}

var x,y:integer;  {описание переменных}

begin

write('Введи трехзначное число:'); {вывод текста на экран}

readln(x); {Чтение данных}

write('Введи любую цифру:'); {Вывод текста на экран}

readln(y);  { Чтение данных }

if (x<100) or (x>999) or (y<0) or (y>9)  {проверка условий}   

then writeln('ERROR!')  {Вывод текста, если условие соблюдено}

else  {Вариант, если в начале все числа введено верно}

   if (y=x div 100) or (y=x mod 10) or (y=x mod 100 div 10) then

      writeln ('Цифра присутствует') {Вывод текста, если условие соблюдено}

   else writeln ('Такой цифры нет');  { Вывод текста, если условие не соблюдено }

Пояснення:

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Вывести на экран числа от a до b, если a> b ( через оператор for и через оператор while)
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

MAXIM76748
Guru-tailor
SEMENOV25352
Stefanidi_Semeikina1896
IAleksandrovna45
klodialeit36
rikki07834591
jagerlayf
Попов1946
goldglobustour725
obar1
Vitalevich1187
emik071089
olelukoya4
atupicyn754