"Программы без ошибок можно написать
двумя способами, но работает — третий"
Алан Джей Перлис

Задачи на тему ввода и вывода данных в Pascal

Примечание. Все входные и выходные данные в заданиях этой группы являются вещественными числами.

Задание №1

Дана сторона квадрата A. Найти его периметр P = 4 × A

Смотреть ответ

Задание №2

Дана сторона квадрата A. Найти его площадь S = A2

Смотреть ответ

Задание №3

Даны стороны прямоугольника A и B. Найти его площадь S = A × B и периметр P = 2 × (A + B)

Смотреть ответ

Задание №4

Дан диаметр окружности D. Найти ее длину L = π × D. В качестве значения π использовать 3.14

Смотреть ответ

Задание №5

Дана длина ребра куба A. Найти объем куба V = A3 и площадь его поверхности S = 6 × A2

Смотреть ответ

Задание №6

Даны длины ребер A, B, C прямоугольного параллелепипеда. Найти его объем V = A × B × C и площадь поверхности S = 2 × (A × B + B × C + A × C)

Смотреть ответ

Задание №7

Найти длину окружности L и площадь круга S заданного радиуса R:

L = 2 × π × R,
S = π × R2
.

В качестве значения π использовать 3.14

Смотреть ответ

Задание №8

Даны два числа A и B. Найти их среднее арифметическое: (A + B) ⁄ 2

Смотреть ответ

Задание №9

Даны два неотрицательных числа A и B. Найти их среднее геометрическое, то есть квадратный корень из их произведения:

A × B

Смотреть ответ

Задание №10

Даны два ненулевых числа. Найти сумму, разность, произведение и частное их квадратов.

Смотреть ответ

Задание №20

Найти расстояние между двумя точками с заданными координатами (X1, Y1) и (X2, Y2) на плоскости. Расстояние вычисляется по формуле:

(X2−X1)2 + (Y2−Y1)2

Смотреть ответ

Задание №40

Найти решение системы линейных уравнений вида

A1×X + B1×Y = C1,
 A2×X + B2×Y = C2,

заданной своими коэффициентами A1, B1, C1, A2, B2, C2, если известно, что данная система имеет единственное решение. Воспользоваться формулами:

X = (C1×B2 − C2×B1) ⁄ D,
 Y = (A1×C2 − A2×C1) ⁄ D,

где D = A1×B2 − A2×B1

Смотреть ответ