faiksuper90
Опубликовано 6 лет назад по предмету Информатика от faiksuper90


Дано трёхзначное число.Найти: а) число единиц в нем; Б) число десятков в нем; в)сумму его цифр; г) произведение его цифр

  1. Ответ
    Ответ дан elenaklon
    var a:integer;beginwrite('Введите трёхзначное число: ');readln(a);writeln('Число единиц в числе ',a, '  равно: ',abs (a mod 10));writeln('Число десятков в  числе ',a, '  равно: ',abs (a mod 100 div 10));writeln('Сумма цифр числа ',a, ' равна: ', abs (a div 100) + abs (a mod 100div 10) + abs (a mod 10));writeln('Произведение цифр числа ',a, ' равно: ', abs (a div 100) * abs (amod 100 div 10) * abs (a mod 10))end.
Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц