Фокус с отгадыванием числа (Исходник)

Другое   31 Декабрь 2010  Автор статьи: admin 

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

Суть фокуса заключается в том, что  вам нужно выбрать любое число из  таблицы ,

Скриншот программы

произвести над ним в уме пару простейших математических операций, запомнить букву, которая будет стоять рядом с получившимся числом, и именно эту букву компьютер безошибочно отгадает. Принцип фокуса как ни странно весьма прост. Этот принцип вы как раз и узнаете в исходном коде программы (на Delphi 2010), который прилагается к ней.

Подробная инструкция:

  1. Загадайте любое двузначное число из таблицы.
  2. Вычтите из загаданного числа сумму его цифр. Например: Загадали число 58, значит нужно из него вычесть 5+8=13. Получится 58-13=45.
  3. Найдите получившееся число в таблице. Запомните букву получившегося числа. Буква стоит справа от каждого числа.
  4. Нажмите кнопку «Угадать».
  5. Рядом появится надпись, в которой вы увидите букву загаданного числа.
  6. Чтобы повторить фокус, перезапустите программу

[note]Скачать исходник[/note]

Научиться программировать

  • на Delphi

  • на Java

  • на C++