Войти Регистрация Спроси ai-bota

Написать программу нахождения суммы цифр 3-х значного числа pascal abc

Показать ответ

Ответ:

Машуня55

10.08.2020 19:17

Var a,b,c,d:integer;
begin
readln(a);
b:=a mod 10;
c:=b mod 10;
d:= c mod 10;
writeln(b+c+d);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

Юлиан228

09.12.2021 21:22

Для риття котловану об ємом 1350 м3 будівельники отримали три екскаватори. Потужна машина продуктивністю 25.5 м3/год витрачає за годину 10 л бензину. Характеристики середнього...

us05042007

19.06.2020 06:22

ПО ИНФОРМАТИКЕ! ЭТО ОЧЕНЬ ВАЖНО У МЕНЯ ТЕСТ...

ВДРПДАОЦПУЦ

04.06.2020 16:21

Какой алгоритм реализован в программе: b=[[3,5,7,78],[12,10,9,56],[45,31,14,23]] s=0 for i in range (len(b)): for j in range (len(b)): s=s+b[j] print ( s= ,s)...

matveyking12345

07.10.2020 04:01

Алг начцел a,c a:=3452c:=mod(a,10)a:=div(a,100)c:=mod(a,10)+10*cвывод c...

Arina8987

02.04.2022 16:21

Вписати фрагмент програми, який відповідає опису Одновимірний масив Ran із 30 цілих чисел...

lianagabrielya

01.02.2021 14:30

Определите результат программ. 1.str= Молодец! 2.print(str[::-1])...

диана2460

10.04.2021 13:38

Запусти Новый файл в среде Python, (File – New File) и запиши программу решения следующей задачи: Составь программу вывода всех четных чисел на интервале от 10 до 20....

hfjfifj

20.08.2022 22:29

ВЫПОЛНЕНИЕ: ТЕКСТ ЗАДАНИЯBычисли разность квадратов, применяя формулу сокращённого умножения: 40² – 39²(Решение пиши в тетради и добавь в файл)ЗАГРУЗКА ФАЙЛОВДобавить файл...

Никита92111

27.03.2021 15:32

Служит центром управления и энергетической станцией робота...

jadeholden451

09.08.2022 13:17

Определите что будет на экране после выполнения фрагмента программы j=3; k=5if j k: j = k**2else: k = k*2print (‘j=’, j, ‘k=’, k) ...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку