yandex rtb 1
ГоловнаЗворотній зв'язок
yande share
Главная->Математика і інформатика->Содержание->5. Форматированный вывод данных.

Основы программирования

5. Форматированный вывод данных.

С помощью команд write и writeln можно осуществлять форматированный вывод данных. Форматированиеэто представление результатов в нужном для пользователя виде. Для этого после выражения записывают формат - двоеточие и число (:n), обозначающее количество позиций на экране, которые необходимо выделить для вывода значения этого выражения. Формат :n применяют для данных целого и строкового типов. При выводе данного действительного типа указывают общее количество позиций (n) и количество позиций для дробной части (m), то есть формат выглядит так :n:m.

Рассмотрим команду вывода writeln('p =', р:5:2) в программе triangle. Она обеспечивает вывод на экран (с целью объяснения результата работы программы) строковой константы ‘р =’ без кавычек и числа 12,8 в формате :5:2, то есть так: р =12.80.

 

Задача 1. Пусть заданы координаты трёх вершин треугольника А(1; 1), В(2; 2) и С(-1; 2). Вычислить медиану mb и радиус описанной окружности.

program Triangle!;

uses Crt;

var xl, yl, x2, y2, хЗ, y3, a, b, c, mb, r, x, y, p, s: real;

begin

clrscr;

writeln(‘Введите координаты:’);

readln(xl, yl, x2, y2, хЗ, уЗ);

a := sqrt(sqr(x3 - x2) + sqr(y3 - y2));    {Вычисляем }

b := sqrt(sqr(xl - хЗ) + sqr(yl - уЗ));    {длины сторон}

с := sqrt(sqr(xl-x2)+sqr(yl-y2)); {треугольника}

х := (xl + хЗ) /2;                       {Вычисляем координаты}

у := (yl + уЗ) / 2;                       {середины стороны b}

{Вычисляем медиану mb}

mb := sqrt(sqr(x - х2) + sqr(y - у2));

р := (а + b + с) / 2; {Вычисляем полупериметр}

{Вычисляем площадь}

s := sqrt(p * (р - а) * (р - b) * (р - с));

г := а * b * с / (4 * s); {Вычисляем радиус}

writeln('mb = ', mb:5:2);            {Выводим медиану}

writeln('r =', г:5:2);                  {Выводим радиус}

readln

end.

 

Замечание. Если не использовать форматированный вывод, то для данных целого и логического типов на экране выделяется до 15 позиций, для данных вещественного типа‑18. Данные вещественного типа выводятся в виде

х. ххххххххххЕзнакхх,

где х - любая цифра, что часто является избыточным. Такие числа на экране могут сливаться.

 

Задание 1. Решить задачу №  2 своего варианта из сборника «Задачи».

Справка. Приведём формулы вычисления некоторых величин для решения задачи № 2: расстояние между точками 11\), (х2, y2):

d=

координаты середины отрезка:

х = (x1+ х2)/2,у= 1 + у2) /2,

ролупериметр треугольника: р = (а + b+ с) / 2;

площадь треугольника: s =

высоты треугольника: ha = 2s / a, hb = 2s / b,hc= 2s / с;

биссектрисы треугольника: ,

радиус описанной окружности: r =abc / (4s);

радиус вписанной окружности: r = s / р, где а, b, с - стороны треугольника.

 

 

8