1. Информатика
  2. Написать программу нахождения

Написать программу нахождения суммы цифр трёхзначного числа)напишите ! )

NObrains0 NObrains0    2   31.05.2019 22:20    1

Ответы
alti1997 alti1997  02.07.2020 08:58
Var  iNum: integer;
begin
  readln(iNum);
  writeln((iNum mod 10) + (iNum div 100 mod 10) + (iNum div 100));
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
kanyakhin kanyakhin  24.12.2020 15:45
Создайте приложение на форме которой помещены элементы управления Timer и Textbox. При запуске приложения Timer увеличивает число, записанное в Textbox на единицу...
Сливенко Сливенко  24.12.2020 15:45
вычислить значение функции f = lnx - e^x+1 на отрезке [1;7] с шагом 1. Составить блок-схемы и программы (3 вида циклов...
ВеликийЗнаток ВеликийЗнаток  07.06.2019 16:50
Дана последовательность чисел 0, 0, 1, 1, 2, 4, 7, 3, 4, 4 … , каждый элемент этой последовательности, начиная с четвёртого равен последней цифре суммы трёх предыдущих...
Отрак Отрак  07.06.2019 15:04
Нужен реферат на тему организация эвм и систем ​...
Suhih77 Suhih77  07.06.2019 15:06
Нужно написать код к программе на языке с. создать файл, содержащий информацию о результатах спортивных соревнований. структура записи: вид спорта, фамилия участника,...
AntihypeSPB AntihypeSPB  07.06.2019 16:50
Вклассе 25 учащихся, 3 из них занимаются в музыкальной школе. найдите отношение числа учащихся, занимающихся в музыкальной школе, к числу всех учащихся класса....
nikolayy220502 nikolayy220502  07.06.2019 15:32
Складіть блок-схему алгоритму розв язування і. нехай відомо кількість мешканців у кожному з n будинків деякої вулиці нумерація будинків непереривна від 1 до n ....
abc71 abc71  07.06.2019 15:57
8-цветный рисунок имеет размер 10x10 какое количество информации он содержит? с решением, . варианты: а. 800 бит б. 800 байт в. 400 байт г. 300 бит...
niznaika8888888888 niznaika8888888888  07.06.2019 16:40
Кто знает паскаль, можете сделать : y=x*2x...
versuspro99 versuspro99  07.06.2019 16:40
Составить блок схему для нахождения выражения при x=10 b=2 k=3 x+7b+9k . я поставил 20...

Популярные вопросы