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

Найти сумму цифр четырёхзначного числа паскаль

Нажмите на рекламу ниже и сразу увидите ответ

↓

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

LindaKron

25.02.2022 22:03

Какое число получится если сложить числа 60 и 76 в 8-битной арифметике со знаком? (В ответе введите десятичное число.)...

kirakoveduard

14.04.2021 02:15

1. Почему при вычислении суммы начальное значение задают равным нулю? 2. Чему равно начальное значение произведения? 3. Каков закон изменения количества элементов? 4. В каком случае...

agayevaaysu

21.08.2020 06:47

Сколько режимов есть у дачика цвета?...

diman129

24.04.2020 11:39

Составить алгоритм на алгоритмическом языке для решения следующей задачи: Найти корни квадратного уравнения ax2 +bx+c = 0...

lololo20021

22.04.2023 20:55

Ниже приведена программа, записанная на языке программирования Паскаль.var s, k: integer;begin readln(s); readln(k); if s = 2 * k then writeln(‘ДА’) else writeln(‘НЕТ’)end.Было проведено...

tanyagorelik

09.04.2022 08:53

Дополни предложение: Поворот сцены выполняется с...

saya8282

30.10.2022 01:36

Компьютерлік модельдерді анықта.Дұрыс жауап саны: 2...

Dimaska123

08.04.2021 13:14

Боже мой, ну кто нибудь с инфой...

Gerdu

20.06.2022 14:53

Тип данных для ячейки С3 – текст число формула Формат данных для ячейки С3 – текстовый числовой процентный дата ...

zavarinaira100

12.10.2022 17:58

Дана таблица. Пользователь скопировал формулу из ячейки С2 в ячейку С3. Определи результат ячейки С3. 1)102)403)-64)-24...

Ответ:

Hicka

03.10.2020 11:53

Readln(x);
x1:=x div 1000;
x2:=(x-(x1*1000)) div 100;
x4:=x mod 10;
x3:=(x-x3-(x1*100)-(x2*100) div 10;
s:=x1+x2+x3+x4;
writeln(s);
readkey;
end.

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

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

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