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

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

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

Ответ:

egorhoyrovegiror

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 оценок)

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

TheAgentSquid

13.05.2023 12:14

Приведите свои примеры в которых информация не будет обладать теми или иными свойствами...

asylhan11

26.08.2021 20:57

Процедураны қай кезде қолдана аламыз?...

Лёшка1203

19.04.2023 14:51

Paint графикалық редакторы деген не? Суретті қалай сақтаймыз?...

fish1704

04.12.2021 14:54

Рассмотрим основные свойства логических операций, называе- мые также законами алгебры логики.1. Переместительный (коммутативный) закон:• для логического умножения:A &...

karinamill09

01.03.2021 20:05

Всберкассу на трехпроцентный вклад положили s рублей. какой станет сумма вклада через n лет? надо решить с пост условием и параметром...

mariaks16

06.04.2023 13:43

Расшифровать слова. вот они: амнкеь,аскстеа,акжкин,секдиат,агубам....

gea99

13.08.2021 19:17

Дано вибірку: 3, 3, 4, 5, 5, 8, 8, 8, 10. Знайдіть міри центральної тенденції цієї вибірки...

mihatyt100

17.05.2022 02:18

Площадь сечения правильной четырехугольной призмы плоскостью, содержащей две ее диагонали равна 120 см2, а сторона освнования 5 см. вычислить площадь полной поверхности...

Natanahgy

17.05.2022 02:18

Прочитать предложения домашнего задания, ЗАПИСАТЬ только те предложения, где есть обособленные второстепенные члены предложения, УКАЗАТЬ чем они являются....

petrgulyaev06

25.12.2022 04:25

написать СПИСОК НЕОБХОДИМЫХ ВЕЩЕЙ ПРИ ЧС....

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

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