profile
Размещено 5 лет назад по предмету Информатика от VegasPeac

Помогите написать программу Pascal ABC, пожалуйста!)
Вводится 4-х значное число.
Задания:
1) Вывести число это же число, в котором меняется местами 1 и 2 цифра, 3 и 4 цифра, например 1234=2143.
2) Если в перевернутом числе 1 двухзначное число>второго , то вывести 1 двухзначное число , если нет, то 2 двухзначное число. Например, 2143= 21<43 , следовательно выводится 43.
3) Найти произведение всех цифр, перевернутого числа.
Заранее спасибо!)

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    Var
       a:integer;
       b,c,d:byte;
    Begin
    Write('Введите четырёхзначное число: ');
    ReadLn(a);
    b:=a div 1000;
    c:=(a div 100) mod 10;
    d:=(a div 10) mod 10;
    a:=a mod 10;
    WriteLn('1: ',c,b,a,d);
    WriteLn('3: ',a*b*c*d);
    c:=c*10+b;
    d:=a*10+d;
    if c>d then WriteLn('2: ',c)
    else WriteLn('2: ',d)
    End.


    Примеры работы программы:

    Введите четырёхзначное число: 6547
    1: 5674
    3: 840
    2: 74
    Введите четырёхзначное число: 9753
    1: 7935
    3: 945
    2: 79
    Введите четырёхзначное число: 3149
    1: 1394
    3: 108
    2: 94
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.