Задать вопрос
7 августа, 04:01

Напишите программы в Pascal:

1. Ввести целое число и определить, верно ли, что все его цифры расположены в порядке возрастания ... 2. Ввести целое число и "перевернуть" его, так чтобы первая цифра стала последней и т. д.

+3
Ответы (1)
  1. 7 августа, 05:40
    0
    Var A, B, k, n, m:integer;

    Begin

    Write ('Введите целое число: ') ;

    ReadLn (A) ;

    B:=A;

    n:=0;

    k:=0;

    While B0 do

    Begin

    n:=n+1;

    B:=B div 10;

    End;

    m:=A mod 10;

    For n: = 1 to n-1 do

    Begin

    A:=A div 10;

    if (m > A mod 10) then

    Begin

    k:=k+1;

    m:=A mod 10;

    End;

    End;

    if k = n then Write ('Верно')

    else Write ('Не верно')

    End.

    Var

    A:integer;

    Begin

    Write ('Введите целое число: ') ;

    ReadLn (A) ;

    While A0 do

    Begin

    Write (A mod 10) ;

    A:=A div 10

    End;

    End.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Напишите программы в Pascal: 1. Ввести целое число и определить, верно ли, что все его цифры расположены в порядке возрастания ... 2. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
Ввести целое число и "перевернуть" его, так чтобы первая цифра стала последней и т. д. в программе КуМиР
Ответы (1)
Нарисуй в окне цепочку П из пяти цифр так, чтобы все пять утверждений были истенными: В цепочке П цифра 3 идет раньше цифры 9. В цепочке П цифра 2 идет позже цифры 6. В цепочке П цифра 6 идет раньше цифры 9. В цепочке П цифра 6 идет позже цифры 5.
Ответы (1)
Как описывают переменные в Pascal? Какие стандартные числовые типы языка Pascal вам известны? Что вам известно о соответствии типов переменных в языке Pascal? Какие арифметические операции можно выполнять в Pascal?
Ответы (1)
Ввести целое число и определить верно ли что все его цифры расположены в порядке возрастания
Ответы (1)
Какие программы относятся к прикладным программам? A. Программы общего назначения. B. Специальные профессиональные программы. C. Языки программирования. D. Сервисные программы. E. Операционные системы.
Ответы (1)