54

Помогите! Выстроить по возрастанию k,e,m через паскаль

stasmix 21 февраля 2023

Помогите! Выстроить по возрастанию k,e,m через паскаль.

категория: информатика

48

Program tutu; Var k, e, m, min, max, sr: integer; beginreadln (k,e,m); sr: =m; if (ksr) then begin min: =m; sr: =min; end; if (max

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...