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

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

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

Вычисление сопротивления электрической цепи.
Введите исходные данные:
Величина первого сопротивления (Ом) › 15
Величина второго сопротивления (Ом) › 27.3
Сопротивление цепи (последовательное соединение): 42.30 Ом.

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

Вычисление силы тока в электрической цепи.
 Введите исходные данные:
Напряжение (вольт) › 36
Сопротивление (Ом) › 1500
Сила тока: 0.024 Ампер.

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

Вычисление расстояния между населенными пунктами.
Введите исходные данные:
Масштаб карты (количество километров в одном сантиметре) › 120
Расстояние между точками, изображающими населенные пункты (см) › 3.5
Расстояние между населенными пунктами 420 км.

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

Вычисление стоимости поездки на дачу и обратно.
Расстояние до дачи (км) › 67
Расход бензина (литров на 100 км пробега) › 8.5
Цена литра бензина (руб.) › 6.5
Поездка на дачу и обратно обойдется в 74.04 руб.

66. Написать программу вычисления объема цилиндра. Ниже представлен рекомендуемый вид экрана во время работы программы.

Вычисление объема цилиндра.
Введите исходные данные:
Радиус основания (см) › 5.5
Высота цилиндра (см) › 7
Объем цилиндра: 665.23 куб. см.

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

Вычисление площади поверхности цилиндра.
Введите исходные данные:
Радиус основания (см) › 5.5
Высота цилиндра (см) › 7
Площадь поверхности цилиндра: 431.97 кв.см.

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

Вычисление объема параллелепипеда.
Введите в одной строке длину, ширину и высоту параллелепипеда (в сантиметрах).
Числа разделяйте пробелами. После ввода последнего числа нажмите Enter.
 › 7.5 2.5 3
Объем параллелепипеда 56.25 куб. см.
Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.