Uses crt;
var x1,y1,x2,y2:real;
begin
writeln('Введите x,y точки A, x,y точки B: ');
read(x1,y1,x2,y2);
if sqr(x1)+sqr(y1)<sqr(x2)+sqr(y2) then
writeln('Точка A ближе.')
else
if sqr(x1)+sqr(y1)>sqr(x2)+sqr(y2) then
writeln('Точка B ближе.')
else
writeln('Точки равноудалены от начала координат.');
<span>end.</span>
возможно
здоровое питание - ето жизнь
жить - здорово
ведение здорового образа жизни - +года молодости
Если Женя(Ж) не любит играть на скрипке то остается 2 варианта .Ему может нравится играть в футбол или играть в компьютерные игры.Задача может решаться двумя способами:
а)Женя любит компьтерныеигры,а Витя играет на скрипке.
б)Женя любит футбол ,а Витя любит комп. игры.
<span>К элементам форматирования таблиц можно отнести: границы и заливка
</span><span>К атрибутам форматирования символов относятся: гарнитура шрифта, размер шрифта, начертание шрифта (полужирное, курсивное, подчеркнутое), цвет
выделения текста, цвет текста, регистр, интервал между символами в слове и т.д.
</span>
<span>К параметрам форматирования абзацев следует отнести: выравнивание текста (по левому или правому краю, по центру, по ширине), отступы абзацев, отступы первой строки абзацев, межстрочный интервал, заливка цвета фона, маркеры и нумерация списков и т.д.
</span>
Форматирование документа в целом - это форматирование номеров страниц, оформление автособираемого или ручного оглавления и т.д.
Основные параметры форматирования (оформления) страниц: границы рабочего поля (поля сверху, снизу, слева, справа), размеры страницы, ориентация страниц.
Пусть V1 - объем цилиндра, а V2 - объем конуса, тогда:
const
pi=3.14;
var
V1,V2,R,h:real;
begin
Write('Введите радиус и высоту: '); Read(R,h);
V1:=pi*sqr(R)*h; V2:=V1/3;
Writeln('Объем цилиндра ',V1:0:5,', объем конуса ',V2:0:5)
end.
<em><u>Тестовое решение:</u></em>Введите радиус и высоту: 5.5 12.81
Объем цилиндра 1216.75785, объем конуса 405.58595
