// PascalABC.NET 3.1, сборка 1230 от 27.04.2016 function FS(a,b:real):=0.5*a*b; begin var a,b:real; Write('Катеты первого треугольника: '); Read(a,b); var S1:=FS(a,b); Write('Катеты второго треугольника: '); Read(a,b); var S2:=FS(a,b); if S1>S2 then Writeln('Площадь первого треугольника больше') else if S1<S2 then Writeln('Площадь второго треугольника больше') else Writeln('Площади треугольников равны') end.
Тестовое решение Катеты первого треугольника: 4.18 6 Катеты второго треугольника: 5.4 3.9 Площадь первого треугольника больше
Богатырь Добрыня Никитич живет под Киевом вместе с матерью, вдовой Мамелфой Тимофеевной. Все любили Добрыню за его силу, добрый нрав и веселый характер.
Как-то в жаркий день отправился он к Пучай-реке искупаться, и там напал на него Змей Горыныч. Стали они биться. Отбил Добрыня одну голову Змею, и начал тот пощады просить. Пообещал Змей Горыныч, что больше не станет русских людей в плен брать. Поверил ему Добрыня и отпустил.
Однако Змей тут же полетел в Киев и похитил там племянницу князя Владимира по имени Забава Путятишна. Увидел это Добрыня и поскакал в Киев, где князь повелел ему отправиться на гору Сорочинскую и Забаву.
Узнала про это Мамелфа Тимофеевна, опечалилась, но виду не подала. Наутро велела она Добрыне вывести из стойла дедова коня Бурку и оседлать его. И дала сыну плетку-семихвостку.
Приехал Добрыня к змеиному логову, а там ползают змееныши. Стал Бурка их топтать, но их было много, обвили они ноги коню, тот сдвинуться не может. Тогда Добрыня ударил его меж ушей плеткой-семихвосткой, и у Бурки силы появились. Потоптал он всех змеенышей до последнего.
Тут и Змей Горыныч прилетел, и начался у них бой, который длился целых три дня и три ночи. И победил Добрыня врага. Еще три дня ждал богатырь, пока земля впитает всю кровь Змея, а потом отправился к пещерам змеиным. Освободил там множество народа, а среди них и Забаву. Посадил ее на коня и отправился в Киев.
Так русский богатырь освободил родную землю от страшного врага и выполнил волю своего князя.
function FS(a,b:real):=0.5*a*b;
begin
var a,b:real;
Write('Катеты первого треугольника: '); Read(a,b);
var S1:=FS(a,b);
Write('Катеты второго треугольника: '); Read(a,b);
var S2:=FS(a,b);
if S1>S2 then Writeln('Площадь первого треугольника больше')
else
if S1<S2 then Writeln('Площадь второго треугольника больше')
else Writeln('Площади треугольников равны')
end.
Тестовое решение
Катеты первого треугольника: 4.18 6
Катеты второго треугольника: 5.4 3.9
Площадь первого треугольника больше
Богатырь Добрыня Никитич живет под Киевом вместе с матерью, вдовой Мамелфой Тимофеевной. Все любили Добрыню за его силу, добрый нрав и веселый характер.
Как-то в жаркий день отправился он к Пучай-реке искупаться, и там напал на него Змей Горыныч. Стали они биться. Отбил Добрыня одну голову Змею, и начал тот пощады просить. Пообещал Змей Горыныч, что больше не станет русских людей в плен брать. Поверил ему Добрыня и отпустил.
Однако Змей тут же полетел в Киев и похитил там племянницу князя Владимира по имени Забава Путятишна. Увидел это Добрыня и поскакал в Киев, где князь повелел ему отправиться на гору Сорочинскую и Забаву.
Узнала про это Мамелфа Тимофеевна, опечалилась, но виду не подала. Наутро велела она Добрыне вывести из стойла дедова коня Бурку и оседлать его. И дала сыну плетку-семихвостку.
Приехал Добрыня к змеиному логову, а там ползают змееныши. Стал Бурка их топтать, но их было много, обвили они ноги коню, тот сдвинуться не может. Тогда Добрыня ударил его меж ушей плеткой-семихвосткой, и у Бурки силы появились. Потоптал он всех змеенышей до последнего.
Тут и Змей Горыныч прилетел, и начался у них бой, который длился целых три дня и три ночи. И победил Добрыня врага. Еще три дня ждал богатырь, пока земля впитает всю кровь Змея, а потом отправился к пещерам змеиным. Освободил там множество народа, а среди них и Забаву. Посадил ее на коня и отправился в Киев.
Так русский богатырь освободил родную землю от страшного врага и выполнил волю своего князя.