Иллюстрированный самоучитель по Turbo Pascal для начинающих

Программы с линейной структурой

69. Написать программу пересчета расстояния из верст в километры (1 верста равняется 1066.8 м). Ниже представлен рекомендуемый вид экрана во время работы программы.

Пересчет расстояния из верст в километры.
Введите расстояние в верстах и нажмите Enter.
 › 100
100 верст(а/ы) – это 106.68 км.

70. Написать программу пересчета веса из фунтов в килограммы (1 российский фунт равен 409.5 г). Ниже представлен рекомендуемый вид экрана во время работы программы.

Пересчет веса из фунтов в килограммы.
Введите вес в фунтах и нажмите Enter
 › 5
5 фунт(а/ов) – это 2.05 кг.

71. Написать программу вычисления величины дохода по вкладу. Процентная ставка (в процентах годовых) и время хранения (в днях) задаются во время работы программы. Ниже представлен рекомендуемый вид экрана во время работы программы.

Вычисление дохода по вкладу.
Введите исходные данные:
Величина вклада (руб.) › 2500
Срок вклада (дней) › 30 Процентная ставка (годовых) › 20
Доход: 41.10 руб.
Сумма по окончании срока вклада: 2541.10 руб.

72. Написать программу пересчета величины временного интервала, заданного в минутах, в величину, выраженную в часах и минутах. Ниже представлен рекомендуемый вид экрана во время работы программы.

Введите величину временного интервала (в минутах) и нажмите Enter
 › 150
150 минут – это 2ч. 30 мин.

73. Написать программу, которая преобразует введенное с клавиатуры дробное число в денежный формат. Например, число 125 должно быть преобразовано к виду 12 руб. 50 коп.

Преобразование числа в денежный формат.
Введите дробное число › 23.6
23.6 руб. – это 23 руб. 60 коп.

74. Написать программу пересчета веса из фунтов в килограммы (1 фунт равняется 409.5 г). Ниже представлен рекомендуемый вид экрана во время работы программы.

Пересчет веса из фунтов в килограммы.
Введите вес в фунтах и нажмите Enter.
 › 3.5
3.5 фунт(а/ов) – это 1 кг 420 г.

75. Написать программу, которая вычисляет площадь треугольника, если известны координаты его углов. Ниже представлен рекомендуемый вид экрана во время работы программы.

Вычисление площади треугольника.
Введите координаты углов (числа разделяйте пробелом):
x1,y1 › -2 5
х2,у2 › 1 7
х3,у3 › 5-3
Площадь треугольника: 23.56 кв.см.
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.