Задать вопрос
25 декабря, 17:45

Определить из каких цифр состоит десятизначное число

Паскаль

программа + блок-схема

+5
Ответы (1)
  1. 25 декабря, 17:57
    0
    var n:integer;

    x1, x2, x3, x4, x5, x6, x7, x8, x9, x10:integer;

    begin

    read (n) ;

    x1:=n div 1000000000;

    x2:=n mod 1000000000 div 100000000;

    x3:=n mod 100000000 div 10000000;

    x4:=n mod 10000000 div 1000000;

    x5:=n mod 1000000 div 100000;

    x6:=n mod 100000 div 10000;

    x7:=n mod 10000 div 1000;

    x8:=n mod 1000 div 100;

    x9:=n mod 100 div 10;

    x10:=n mod 10 div 1;

    writeln ('1 = ', x1) ;

    writeln ('2 = ', x2) ;

    writeln ('3 = ', x3) ;

    writeln ('4 = ', x4) ;

    writeln ('5 = ', x5) ;

    writeln ('6 = ', x6) ;

    writeln ('7 = ', x7) ;

    writeln ('8 = ', x8) ;

    writeln ('9 = ', x9) ;

    writeln ('10 = ', x10) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Определить из каких цифр состоит десятизначное число Паскаль программа + блок-схема ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы