var a, b, c: integer; //инициализация переменных (длин отрезков)
begin //Начало программы (тело программы)
write (' Длины сторон: '); //Вывод сообщения в консоль
readln (a,b,c); //Организация ввода (длин отрезков)
if (a <= b+c) and (b <= a+c) and (c <= a+b) then //В условии if проверяется, что каждая из сторон меньше либо равна сумме других. Если хотя бы одна будет больше, то все логическое выражение вернет ложь (false). В таком случае сработает ветка else.
writeln ('Треугольник существует.')
else
writeln ('Треугольник не существует.');
readln(); //Инициализация закрытия по нажатию на кнопку
end. //Конец программы
Объяснение:
using System;
namespace kp9p_pr_8_zad_1
{
class Program
{
enum Yay
{
min = 0,
krit = 72,
max = 100
}
static void Main(string[] args)
{
Yay t;
t = Yay.min;
Console.WriteLine("\nМнимальная температура: {0}", (int)t);
t = Yay.krit;
Console.WriteLine("\nКритическая температура: {0}", (int)t);
t = Yay.max;
Console.WriteLine("\nМаксимальная температура: {0}", (int)t);
}
}
}