Ответ:
я могу, у меня 4 кода на нее. пиши мне в дс vitas#8857. обговорим.
Объяснение:
Код прекреплен к ответу, всё прокоментрировано. Так же продублирован в коментариях. Если есть вопросы, велком в те же коментарии.
Спасибо за отметку "Лучший ответ" и нажатую кнопочку "Спасибо" (:
Это самый элементарный алгоритм, я б на вашем месте сам подумал, как сделать это задание.
Как по мне, есть 2 пути решения задачи:
- через if с подставлением по 1 сравнению (долгий)
- через if с подставлением по 2 сравнения (короткий)
берем короткий
var a,b,c:integer;
begin
readln(a,b,c);
if ((a<c) and (a<b)) then write(a);
if ((b<a) and (b<c)) then write(b);
if ((c<a) and (c<b)) then write(c);
<span>end.</span>
32000000 килобайт в 32 гигабайтах
<span>Это файл инициализации сервера сертификатов для Paradox.NET. Он нужен .</span>