Лучшие помощники
- Megamozg 2180 б
- Matalya1 1800 б
- DevAdmin 1690 б
- arkasha_bortnikov 840 б
- Dwayne_Johnson 840 б
15 января 2023 09:15
350
Информатика: с клавиатуры вводится трехзначное число, найдите сумму цифр данного числа
1
ответ
Pascal ( //комментарии к программе, т.е. пояснение строки)
Var a,b,c,d:integer;
begin
Write('Введите трехзначное число'); read(a);
b:=a div 100; // число сотен
c:=a mod 100 div 10; // число десятков
d:=a mod 10; // число единиц
s:=b+c+d; // складываем цифры
Write('Сумма цифр трехзначного числа равна: ',s);
end.
Var a,b,c,d:integer;
begin
Write('Введите трехзначное число'); read(a);
b:=a div 100; // число сотен
c:=a mod 100 div 10; // число десятков
d:=a mod 10; // число единиц
s:=b+c+d; // складываем цифры
Write('Сумма цифр трехзначного числа равна: ',s);
end.
0
·
Хороший ответ
17 января 2023 09:15
Остались вопросы?
Еще вопросы по категории Информатика
Объем свободной памяти на диске 450мб,разрядность звуковой платы 16 какова длительность звучания стереоаудио файла,записанного с частотой дискретизаци...
На месте преступления были обнаружены четыре обрывка бумаги 4.243 116.2 13 .23 А Б В Г Посмотрите задание 478 и 458...
Продумайте, какими графическими образами можно проиллюстрировать: 1) виды информации по способу её восприятия человеком 2) свойства информации Найд...
Процессор обрабатывает информацию: а) в десятичной системе счисления; б) в двоичном коде; в) на языке Вавю; г) в текстовом виде; д) используя перевод...
Что такое программное обеспечение компьютера?Какова его роль?...
Все предметы