Написать программу которая удваивает меньшее из трёх чисел
Написать программу которая удваивает меньшее из трёх чисел
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Отвечай на вопросы, зарабатывай баллы и трать их на призы.
Подробнее
Подробнее
Var a, b, c, min: integer;
Begin
Readln(a, b, c);
Min:=a;
If b<min and b<c then min:=b
Else c<min and c<b then min:=c;
Writeln(min)
End.