Меню

Обратная связь

Сейчас на сайте

•Сейчас• •39 гостей• •онлайн•

Авторизация



Назад...

Рассмотрим задачи на целочисленное деление.


Эти задачи важны для составления эффекивных алгоритмов, поэтому нужно научиться решать простейшие с использованием целочисленного деления.

Команды:

div - определение целой части при делении

mod - определение остачи при делении

Деление может выполняться только для целых чисел.

Демонстрация их работы:

34 div 5 = 6

34 div 3 = 11

12 div 5 = 2

34 mod 5 = 4

34 mod 3 = 1

12 mod 5 = 2

 

Задача 1. Определите, сколько целых тонн в массе, выраженной в килограммах. Значение массы в килограммах введите с клавиатуры.

Var

a : integer;

Begin

readln(a);

writeln(a div 1000);

end.

Вид результата работы программы:

3450

3

 

Задача 2. Дано расстояние в сантиметрах. Выразите его в метрах и сантиметрах.

Составьте программу, чтобы она удовлетворяла формату ввода и формату вывода по образцу:

Ввод:

234

Вывод:

2 м 34 см


Var

a,m,sm : integer;

Begin

readln(a);

m:=a div 100;

sm:=a mod 100;

writeln(m,' м ',sm,' см');

end.

Вид результата работы программы:

234

2 м 34 см

 

Задача 3. В классе а учеников. В столовой им выдали n конфет. По сколько конфет получил каждый? Сколько конфет остались нераспределенными?

Ввод:

23  324

Вывод:

14    2


Var

a,n,kol,ost : integer;

Begin

readln(a,n);

kol:=n div a;

ost:=n mod a;

writeln(kol,' ',ost);

end.

Вид результата работы программы:

23    324

14    2

 

Рассмотрим задачи на определение цифр числа.

Например, дано трехзначное число 452.

  1. Определим число единиц   
    a:=452 mod 10; (ответ 2)
    Это будет остача от целочисленного деления числа на 10.
  2. Определим цифру в разряде сотен
    a:=452 div 10;
    a:=a mod 10;
    Первой командой отбрасываем цифру разряда единиц, второй командой получаем нужную цифру.
    Можно было посчитать все сразу
    a:=(452 div 10) mod 10; (ответ 5)
  3. Определим цифру в разряде десятков тысяч шестизначного числа а
    a:=943568;
    b:=(a div 10000) mod 10; (ответ 4)

 

Задача 4. Найдите сумму первой и последней цифры четырехзначного числа. Мы должны получить первую цифру, затем последнюю и найти сумму.

Ввод:

4367

Вывод:

11


Var

a,p1,p2,s : integer;

Begin

readln(a);

p1:=a div 1000;    // получили первую

p2:=a mod 10;      // получили последнюю

s:=p1+p2;

writeln(s);

end.

Вид результата работы программы:

6789

15

 

Задача 5. Найдите сумму цифры разряда единиц и цифры разряда тысяч.

Так как число семизначное, то тип вводимого числа нужно описать longint. Алгоритм решения будет немного отличаться от решения четвертой задачи.

Ввод:

8354367

Вывод:

11


Var

a : longint;

p1,p2,s : integer;

Begin

readln(a);

p1:=(a div 1000) mod 10;

p2:=a mod 10;

s:=p1+p2;

writeln(s);

end.

Вид результата работы программы:

6677889

16

 

Задача 6. Запишите четырехзначное число в обратном порядке. Нужно выделить каждую цифру в однозначное число и вывести полученные цифры в обратном порядке.

Ввод:

4367

Вывод:

7634


Var

a,p1,p2,p3,p4 : integer;

Begin

readln(a);

p4:=(a div 1000) mod 10;

p3:=(a div 100) mod 10;

p2:=(a div 10) mod 10;

p1:=a mod 10;

writeln(p1,p2,p3,p4);

end.

Вид результата работы программы:

6789

9876

 

•Информация о профиле•

Application afterLoad: 0.001 seconds, 0.29 MB
Application afterInitialise: 0.038 seconds, 0.96 MB
Application afterRoute: 0.043 seconds, 1.20 MB
Application afterDispatch: 0.055 seconds, 1.50 MB
Application afterRender: 0.081 seconds, 1.86 MB

•Использование памяти•

1986320

•Зарегистрировано запросов: 20•

  1. SELECT *
      FROM jos_session
      WHERE session_id = 'hdsf545c8q8d1bt4gm56rmc4v0'
  2. DELETE
      FROM jos_session
      WHERE ( time < '1733297616' )
  3. SELECT *
      FROM jos_session
      WHERE session_id = 'hdsf545c8q8d1bt4gm56rmc4v0'
  4. INSERT INTO `jos_session` ( `session_id`,`time`,`username`,`gid`,`guest`,`client_id` )
      VALUES ( 'hdsf545c8q8d1bt4gm56rmc4v0','1733301216','','0','1','0' )
  5. SELECT *
      FROM jos_components
      WHERE parent = 0
  6. SELECT folder AS type, element AS name, params
      FROM jos_plugins
      WHERE published >= 1
      AND access <= 0
      ORDER BY ordering
  7. SELECT *
      FROM jos_migration_backlinks
      WHERE url LIKE 'component/content/article/95.html%' OR sefurl LIKE 'component/content/article/95.html%'
  8. SELECT template
      FROM jos_templates_menu
      WHERE client_id = 0
      AND (menuid = 0 OR menuid = 0)
      ORDER BY menuid DESC
      LIMIT 0, 1
  9. SELECT id, title, module, position, content, showtitle, control, params
      FROM jos_modules AS m
      LEFT JOIN jos_modules_menu AS mm
      ON mm.moduleid = m.id
      WHERE m.published = 1
      AND m.access <= 0
      AND m.client_id = 0
      AND ( mm.menuid = 0 OR mm.menuid = 0 )
      ORDER BY position, ordering
  10. SELECT *
                           
      FROM jos_menu
                           
      WHERE menutype='mod_maximenu_CK'
      AND published=1
                           
      ORDER BY sublevel DESC,ordering
                            ;
  11. SELECT *
                           
      FROM jos_modules
                           
      WHERE published=1
                           
      ORDER BY id
                            ;
  12. SELECT *
                           
      FROM jos_menu
                           
      WHERE menutype='uth_proc'
      AND published=1
                           
      ORDER BY sublevel DESC,ordering
                            ;
  13. SELECT *
                           
      FROM jos_modules
                           
      WHERE published=1
                           
      ORDER BY id
                            ;
  14. SELECT *
                           
      FROM jos_menu
                           
      WHERE menutype='Olimp'
      AND published=1
                           
      ORDER BY sublevel DESC,ordering
                            ;
  15. SELECT *
                           
      FROM jos_modules
                           
      WHERE published=1
                           
      ORDER BY id
                            ;
  16. SELECT *
                           
      FROM jos_menu
                           
      WHERE menutype='obr_sv'
      AND published=1
                           
      ORDER BY sublevel DESC,ordering
                            ;
  17. SELECT *
                           
      FROM jos_modules
                           
      WHERE published=1
                           
      ORDER BY id
                            ;
  18. SELECT *
                           
      FROM jos_menu
                           
      WHERE menutype='raznoe'
      AND published=1
                           
      ORDER BY sublevel DESC,ordering
                            ;
  19. SELECT *
                           
      FROM jos_modules
                           
      WHERE published=1
                           
      ORDER BY id
                            ;
  20. SELECT guest, usertype, client_id
      FROM jos_session
      WHERE client_id = 0

•Языковые файлы загружены•

  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.plg_system_debug.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.com_content.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.tpl_MY_sh.ini
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/en-GB/en-GB.tpl_MY_sh.ini
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.mod_maximenu_CK.ini
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/en-GB/en-GB.mod_maximenu_CK.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.mod_whosonline.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.mod_login.ini 1
  • /var/www/user13295/data/www/ssa.lel-gimnazia.by/language/ru-RU/ru-RU.mod_breadcrumbs.ini 1

•Диагностика непереведённых строк•

•Нет•

•Дизайнер непереведённых строк•

•Нет•