profile
Опубликовано 5 лет назад по предмету Информатика от calidreamer

Задано пятизначное число.Найдите цифры и сумму цифр пятизначного числа. (Программа на Паскале) div и mod

  1. Ответ
    Ответ дан Mevel
    // - комментарии, можешь не писать, это пояснение для тебя

    var z,a,b,c,d,e,f: integer;
    begin
    Write('Введите пятизначное число'); read(z);
    a:=a div 10000;                      // число десятков тысяч
    b:=a mod 10000 div 1000;     // число тысяч 
    c:=a mod 1000 div 100;         // число сотен
    d:=a mod 100 div 10;             // число десятков 
    e:=a mod 10;                         // число единиц
    f:=a+b+c+d+e;                      // сумма цифр
    Writeln('Цифры: ', a,b,c,d,e);
    Write('Сумма цифр: ',f);
    end.
Самые новые вопросы