• Предмет: Информатика
  • Автор: Anyuta20023
  • Вопрос задан 2 года назад

Решите задачу в Паскаль

Приложения:

Аноним: можете мне помочь с задчей пожалуйста
Аноним: по инфформатике
Аноним: любую из тех которую прошу
Anyuta20023: мне решите для начала
Аноним: я жду 5 часов
Аноним: мне хер кто помог
evilforestart: Вам не кто не помог потому что в вашем условии не черта непонятно
Аноним: єто какое условие в задаче
Аноним: я его скопировал
Аноним: помоги пож хоть какуюто

Ответы

Ответ дал: Omikami
0

Ответ:

begin

 var x, y, z:integer;

 read(x, y, z);

 write(max(min(x, y), z) / 3);

end.

//PascalABC.NET

Вас заинтересует