Задания.ру
Анонимно
2 часа назад

Как на Pascal ABC написать программу, которая будет считать сумму цифр числа, введенного с клавиатуры?
Количество цифр в числе неизвестно! Число целое. Очень желательно с объяснениями (вне программы). Заранее спасибо!!!
P.S. Я дам 15 баллов! Очень нужно!!!

Ответ

Анонимно
program LOL2016;
var n,s,r:integer;
begin
readln(n);
s:=0;
while(n <> 0) do begin
r:=n mod 10;
s:=s+r;
n:=n div 10;
end;
writeln(s);
end.

если что то не понятно просто спроси и я обьясню  :)

Новые вопросы по Информатике

1)На клечатом поле размером 5*15 изобразить букву Ы с помощью пульта,и написать алгоритм. Робот находится в нижнем правом углу поля.2)Написать программу,следуя которой робот сможет пройти по коридору...
1 - 4 классы
50 секунд назад
Построить блок-схему алгоритма нахождения квадрата минимального значения среди трёх чисел x, y, z.
10 - 11 классы
2 минуты назад
1 В текстовом режиме экран монитора компьютера обычно разбивается на 25 строк по 80 символов в строке. Определите объем текста, занимающего весь экран монитора, в кодировке Unicode. 2 Сообщение заним...
5 - 9 классы
6 минут назад
CРОЧНО ПОМОГИТЕ составить блок схему которая вычисляет произведение чисел от 1 до 10
10 - 11 классы
8 минут назад
Найдите двоичное восьмеричное и шестнадцатеричное прпредстаение десятичной дроби ? числа 88,45
10 - 11 классы
11 минут назад