Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.01.2014, 14:10   #1
Жаннулька
Пользователь
 
Регистрация: 09.01.2014
Сообщений: 11
По умолчанию Исполнить в таблицах исполнения следующие программы.

Код:
var n,s:integer;
begin
  n:=2014; s:=0;
  repeat
    s:=s+n mod 5;
    n:=n div 5
  until n=0;
  writeln('s=',s);
end.

___________
используйте теги для оформления кода.

Модератор

Последний раз редактировалось Serge_Bliznykov; 13.01.2014 в 15:02.
Жаннулька вне форума Ответить с цитированием
Старый 13.01.2014, 14:16   #2
Жаннулька
Пользователь
 
Регистрация: 09.01.2014
Сообщений: 11
По умолчанию

объясните как это устно считать
Жаннулька вне форума Ответить с цитированием
Старый 13.01.2014, 14:48   #3
Vanta11a
Lawful Evil
Участник клуба
 
Аватар для Vanta11a
 
Регистрация: 13.05.2008
Сообщений: 1,208
По умолчанию

Сумма всех цифр в числе, судя по всему.
Получить целую часть от деления на десять, добавить её к сумме, повторить пока остаток от деления на 10 не равен 0.
Алгоритм - бесплатен. Поиск багов - бесплатен. Реализация алгоритма - за отдельную плату.
На форуме помогают советами и объясняют, а не пишут на халяву программы, лабы, курсачи и т.д. (c)
Vanta11a вне форума Ответить с цитированием
Старый 13.01.2014, 15:08   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,229
По умолчанию

Цитата:
Код:
s:=s+n mod 5;
к содержимому s прибавить остаток от деления на 5 и результат поместить опять в s

Цитата:
Код:
 n:=n div 5
n разделить целочисленно (отбросив возможный остаток) на 5 и результат поместить в n

Цитата:
Код:
until n=0;
повторять действия в цикле, до тех пор, пока n не станет равным нулю.

например, в начале s равно 0 и n = 2014
первый проход:
s := 0 + 2014 mod 5 -> 0 + 4 -> s := 4
n := 2014 div 5 -> n := 402
т.к. n не равно нулю повторяем цикл:
второй проход:
s := 4 + 402 mod 5 -> 4 + 2 -> s := 6
n := 402 div 5 -> n := 80
т.к. n не равно нулю повторяем цикл:
Третий проход:
s := 6 + 80 mod 5 -> 6 + 0 -> s := 6
n := 80 div 5 -> n := 16
т.к. n не равно нулю повторяем цикл:
четвёртый проход:
и т.д.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 13.01.2014, 15:50   #5
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
Сумма всех цифр в числе, судя по всему.
Десятичная сумма цифр числа в пятиричной СИ.
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Последний раз редактировалось Аватар; 13.01.2014 в 16:02.
Аватар вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
исполнить тетрады на си под линукс tarasman11 Помощь студентам 0 02.05.2013 16:28
Хочу исполнить внутри echo solskjaer PHP 2 11.01.2013 14:20
Составить программы, реализующие следующие криптографические методы douche Помощь студентам 0 11.06.2010 10:23
как исполнить файл по таймеру MixanMM Общие вопросы Delphi 5 25.01.2010 12:25
С++ Builder Изменение размеров компонентов на форме во время исполнения программы Bair C++ Builder 3 18.12.2008 13:43