Задачи с ветвлениемЯвляется ли число К трехзначнымКакое из чисел а, б, с, является меньшимЕсть ли среди чисел а, б, с взаимно противоположныеЯвляется л

 Задачи с ветвлениемЯвляется ли число К трехзначнымКакое из чисел а, б, с, является меньшимЕсть ли среди чисел а,б,с взаимно противоположные

Является ли 4-ехугольник со сторонами а, б, с. д ромбом

  • VAR   k: String;BEGIN   Read(k);   if (Length(k) = 3) then Write(k, ‘ — 3-ное число)   else Write(k, ‘ — не 3-ное число’);END.————————————————————————VAR   a,b,c: LongInt;BEGIN   Read(a, b, c);   If (a