Var a, b, c:integer;
Begin
Readln(a,b,c);
If a>=b+c then Writeln('Нет' )
Else if b>=a+c then Writeln('Нет')
Else if c>=a+b then Writeln('Нет')
Else Writeln('Да');
End.
Использование русских букв в названии переменной (с) это очень сильно, а ещё кавычки не `, а ' должны быть. Код можно еще улучшить избавившись от большого кол-ва проверок if т. к. это замедляет компиляцию
Var a, b, c:integer;
Begin
Readln(a,b,c);
If (a>=b+c) or (b>=a+c) or (c>= a+b) then Writeln('Нет' )
Else Writeln('Да');
End.
На Русском.
Эргоно́мика — наука о при должностных обязанностей, рабочих мест, предметов и объектов труда, а также компьютерных программ для наиболее безопасного и эффективного труда работника, исходя из физических и психических особенностей человеческого организма.
На Казахском.
Эргономика-адам ағзасының физикалық және психикалық ерекшеліктеріне негізделген қызметкердің ең қауіпсіз және тиімді жұмысына арналған лауазымдық міндеттерді, жұмыс орындарын, еңбек объектілері мен объектілерін, сондай-ақ компьютерлік бағдарламаларды бейімдеу туралы ғылым.
Объяснение:
