< >

Turbo Pascal Человек ввел трехзначное число, при помощи функций div и mod найти их сумму.

Ответы

Ответ дал: ali07
0

program xxx;

  var n, c, d, e, s : integer;

begin

   write('введите число');

   readln(n);

   c:= n div 100;

   d:=(n div 10) mod 10;

   e:= n mod 10;

   s:= c + d + e;

   writeln('сумма чисел =', s);

   readln

end.

Похожие вопросы
Русский язык
2 года назад
продолжите список терминологических словосочетаний ,которые используются в научной речи.равнобедренный треугольник,перистые блака
Русский язык
2 года назад
ПРОЧИТАЙ ТЕКСТ.пОДУМАЙ  ПОЧЕМУ ОН ТАК НАЗВАН.МУЗЫКА .ПОСЛУШАЙ МУЗЫКУ ИЗ ОПЕРЫ К СКАЗКЕ ЧУКОВСКОГО.ВОТ РЫЧИТ КРОКОДИЛ НА ГРЯЗНУЛЮ. А ТЕПЕРЬ ОРКЕСТР РАССКАЗЫВАЕТ, ЧТО СЛУЧИЛОСЬ ДАЛЬШЕ. СЛЫШИШЬ? МЧИТЬСЯ
Математика
7 лет назад
Приведем числа a = √11 + 4√7 и b = √11-4√7 a) Вычислите a • b b) покажите, что (ab) ² = 16
Математика
7 лет назад
діаметр кола дорівнює 8 см,а довжина кола дорівнює...терміново будь ласка
Химия
10 лет назад
Нужно определить степень окисления металла и кислотообразующего элементап кислотного остатка: Fe(NO3)2 и CaHPO4.
Математика
10 лет назад
Для посадки приготовили 30 кустов..Пятая часть всех кустов-малина,четвёртая часть оставшихся кустов-крыжовник.Сколько было кустов крыжовника?     Решение 1)Сколько было кустов малины? 2)Сколько
Математика
10 лет назад
постройка дома стоит 382200р.из этой суммы по 45%ПРИХОДИТСЯ НА СТОИМОсть работ и материала,а остальное-на его доставку.найдите стоимость материала и доставки.(Я нашла только стоимость материала).
Геометрия
10 лет назад
Дано: треуг. АВС угол С = 90градусов угол В = 27градусов CD - высота треуг. АВС CK - биссектриса треуг. АВС __________________________   Найти: угол DCK