РЕШИТЕ ** ЯЗЫКЕ ПАСКАЛЬ, ПОМОГИТЕ ПОЖАЛУЙСТА*******ДАНЫ ДЛИНЫ ЧЕТЫРЕХ РАЗЛИЧНЫХ КАБЕЛЕЙ....

Question

РЕШИТЕ НА ЯЗЫКЕ ПАСКАЛЬ, ПОМОГИТЕ ПОЖАЛУЙСТА*******

ДАНЫ ДЛИНЫ ЧЕТЫРЕХ РАЗЛИЧНЫХ КАБЕЛЕЙ. НАЙТИ САМЫЙ КОРОТКИЙ ИЗ НИХ.

Answer 1

Var a1,a2,a3,a4:integer;
begin
read (a1,a2,a3,a4);
if a1if a2if a3if a4end.

Comments

опять же длинное, но рабочее

---

ВАся Спасибо, я просто восстанавливаюсь давно дело было плохо помню информатику))))

---

я изменил, то немножко неправльное было, щас норм

---

ок)

---

Отлично !)))

---

Вася мне написали что неэффективно !!!