
- •Оглавление
- •Введение………………………………………………………..……
- •I. Теоретический раздел работы………………………………………….….
- •I. Теоретический раздел работы…………………………………………….
- •I. Теоретический раздел работы……………………………………………..
- •Работа 1
- •1.Введение.
- •2. Начало работы в среде Turbo Pascal.
- •2.1. Вызов Turbo Pascal.
- •2.2. Использование меню.
- •2.3. Работа с окнами. Использование мыши.
- •2.4. Первая программа.
- •2.5. Работа с файлами
- •2.6. Основные приемы работы с текстовым редактором.
- •2.7. Меню Edit
- •3. В конце работы Вы должны уметь
- •Работа 2 ввод и вывод информации
- •I. Теоретический раздел работы
- •1. Введение.
- •2. Структура программы на языке Паскаль
- •3. Типы данных в языке Turbo Pascal.
- •4. Ввод и вывод данных.
- •II. Экспериментальный раздел работы
- •III. Дополнительный материал.
- •IV. Раздел заданий для самостоятельной работы.
- •Работа 3 расчет по формулам
- •I.Теоретический раздел работы
- •1. Некоторые понятия лексика языка Turbo Pascal.
- •2. Представление вещественных чисел на эвм.
- •3. Оператор присваивания
- •4. Алгебраические выражения.
- •5. Описание пользовательских подпрограмм-функций.
- •II.Экспериментальный раздел работы
- •III. Раздел заданий для самостоятельной работы.
- •Работа 4
- •I.Теоретический раздел работы
- •1. Некоторые сведения о целых типах данных.
- •2. Операции над целыми типами данных.
- •3. Представление целых чисел в компьютере.
- •4. Некоторые стандартные подпрограммы для работы с целыми числами.
- •II.Экспериментальный раздел работы
- •III. Раздел заданий для самостоятельной работы
- •Работа 5 Логический тип данных
- •I.Теоретический раздел работы
- •1. Некоторые сведения о логическом типе данных.
- •2. Логические выражения.
- •3. Основные законы алгебры логики.
- •4. Побитовые операции над целыми числами.
- •Работа 6
- •I.Теоретический раздел работы
- •1. Введение.
- •2. Оператор условного перехода if ... Then...Else
- •3. Условный оператор case...Of
- •II. Экспериментальный раздел работы
- •Работа 7
- •I. Теоретический раздел работы
- •1.Введение.
- •2. Оператор цикла while… do.
- •II. Экспериментальный раздел работы.
- •2. Оператор цикла repeat … until.
- •3. Суммирование рядов.
- •II. Экспериментальный раздел работы Пример 1. Пусть требуется найти сумму ряда:
- •III. Раздел заданий для самостоятельной работы
- •Работа 9 оператор цикла с параметром
- •I. Теоретический раздел работы
- •1. Введение
- •2. Оператор цикла for …do
- •3. Операторы завершения цикла
- •4. Алгоритм Горнера.
- •II. Экспериментальный раздел работы
- •III. Раздел заданий для самостоятельной работы
- •Список литературы
III. Раздел заданий для самостоятельной работы
А.
Составить программу, в которой
дано расстояние в сантиметрах. Найти число полных метров в нем;
дана масса в килограммах. Найти число полных центнеров в ней;
дана масса в килограммах. Найти число полных тонн в ней;
дано расстояние в метрах. Найти число полных километров в нем;
дан прямоугольник с размерами 543
130 мм.
Сколько квадратов со стороной 130 мм можно отрезать от него?
Дано двузначное число. Найти:
число десятков в нем;
число единиц в нем;
сумму его цифр;
произведение его цифр.
Дано двузначное число. Получить число, образованное при перестановке цифр заданного числа.
Дано трехзначное число. Найти число, полученное при прочтении его цифр справа налево.
Дано трехзначное число. Найти:
число единиц в нем;
число десятков в нем;
сумму его цифр;
произведение его цифр;
Дано целое число, большее 99. Найти третью от конца его цифру ( так, если данное число 2345, то искомая цифра 3).
Дано четырехзначное число. Найти:
сумму его цифр;
произведение его цифр.
Дано натуральное число
(
). Найти число единиц в нем.
Дано натуральное число (
). Найти число десятков в нем.
Дано натуральное число ( ). Найти число сотен в нем.
Дано натуральное число (
). Найти число тысяч в нем
Дано двузначное число. Получить число, образованное при перестановке цифр заданного числа.
B.
Дано трехзначное число.
В нем зачеркнули первую слева цифру и приписали её в конце. Найти полученное число.
В нем зачеркнули последнюю справа цифру и приписали её в начале. Найти полученное число.
Найти число, полученное при перестановке первой и второй цифр заданного числа.
Найти число, полученное при перестановке второй и третьей цифр заданного числа.
Получить 6 чисел, образованных при перестановке цифр заданного числа.
Из трехзначного числа
Вычли его последнюю цифру. Когда результат разделили на 10, а к частному слева приписали последнюю цифру числа , то получилось число 237. Найти число
Вычли его последнюю цифру. Когда результат разделили на 10, а к частному слева приписали последнюю цифру числа , то получилось число
. Найти число . По заданному найти число (значение вводится с клавиатуры, 10≤ ≤999, и при этом число десятков в не равно нулю).
В трехзначном числе
Зачеркнули первую цифру. Когда оставшееся число умножили на 10, а произведение сложили с первой цифрой числа , то получили число 564. Найти число .
Зачеркнули первую цифру. Когда полученное число умножили на 10, а произведение сложили с первой цифрой числа , то получили число . По заданному найти число (значение вводится с клавиатуры, 1≤ ≤999).
Зачеркнули его вторую цифру. Когда к образованному при этом двузначному числу слева приписали вторую цифру числа , то получилось число 546. Найти число .
Зачеркнули его вторую цифру. Когда к образованному при этом двузначному числу слева приписали вторую цифру числа , то получилось число . По заданному найти число (значение вводится с клавиатуры, 10≤ ≤999, и при этом число десятков в не равно нулю).
Зачеркнули его вторую цифру. Когда к образованному при этом двузначному числу справа приписали вторую цифру числа , то получилось число 456. Найти число .
Зачеркнули его вторую цифру. Когда к образованному при этом двузначному числу справа приписали вторую цифру числа , то получилось число . По заданному найти число (значение вводится с клавиатуры, 100≤ ≤999).
Зачеркнули его последнюю цифру. Когда в оставшемся двузначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа , то получилось число 654. Найти число .
Зачеркнули его последнюю цифру. Когда в оставшемся двузначном числе переставили цифры, а затем приписали к ним слева последнюю цифру числа , то получилось число . По заданному найти число (значение вводится с клавиатуры, 1≤ ≤999, и при этом число единиц в не равно нулю).
Дано четырехзначное число.
Найти число, полученное при прочтении его цифр справа налево.
Получить число, образуемое при перестановке двух первых и последних цифр заданного числа. Например, из числа 4566 получить 6645, из числа 7304 – 473.
Получить число, образуемое при перестановке первой и второй, третьей и четвертой цифр заданного числа. Например, из числа 5434 получить 4543, из числа 7048 – 784.
Получить число, образуемое при перестановке второй и третьей цифр заданного числа. Например, из числа 5084 получить 5804.
Даны целое число (
) и последовательность цифр 10111213…9899, в которой выписаны подряд все двузначные числа. Определить:
номер пары цифр, в которую входит -я цифра;
двузначное число, образованное парой цифр, в которую входит -я цифра;
-ю цифру, если известно, что: - – четное число; - - нечетное число.
Даны целое число ( ) и последовательность цифр 101102103…149150, в которой выписаны подряд все трехзначные числа от 101 до 150. определить -ю цифру, если известно, что: - - число кратное трём; - - одно из чисел 1,4,7…;- - одно их чисел 2,5,8…
Определить время приземления самолета в часах X, минутах Y и секундах Z. Известно, что самолет вылетел в X0 часов, Y0 минут и Z0 секунд и находился в воздухе Q секунд. Учесть переход времени на другие сутки.
С начала 1990 года по некоторый день прошло n месяцев и 2 дня (n≥1). Присвоить целочисленной величине 1,2, …, 11 или 12 в зависимости от того, каким месяцем (январем, февралём и т.п.) является месяц этого дня. Например, при
значение равно 3.
Часовая стрелка образует угол Y с лучом, проходящим через центр и через точку, соответствующую 12 часам на циферблате, 0<Y≤
. Определить значение угла для минутной стрелки, а также количество часов и полных минут.
Даны целые числа
(0<
23, 0
, 0
), указывающие момент времени: “b часов, m минут, s секунд”. Определить угол в градусах между положением часовой стрелки в начале суток и в указанный момент времени.
С начала суток часовая стрелка повернулась на Y градусов (0
,Y- вещественное число). Определить число полных часов и число полных минут, прошедших с начала суток.
С начала суток прошло секунд. Определить:
сколько полных часов прошло с начала суток;
сколько полных минут прошло с начала очередного часа;
сколько полных секунд прошло с начала очередной минуты.
С. (В программах условные операторы и операторы цикла не использовать)
Даны два целых числа a и b. Если делится на или делится на , то вывести 1, иначе - любое другое число.
Даны целые числа b, m (0< 12, 0 ), указывающие момент времени: “b часов, m минут ”. определить наименьшее время ( число полных минут), которое должно пройти до того момента, когда часовая и минутная стрелки на циферблате
совпадут;
расположатся перпендикулярно друг другу.
Определите, какой день недели приходится на 1 января для любого года XX и XXI вв. 1 января 1900 г. – Понедельник.
Дано целое число
. Присвоить целочисленной величине значение 1, 2,…, 6 или 7 в зависимости от того, на какой день недели (понедельник, вторник,…, субботу или воскресенье) приходится -й день года, в котором 1 января – понедельник.
Составьте программу определяющую день недели по дате.(см. с.3, с.4)
Составьте программу определяющую разницу в сутках между двумя датами.