<u>PascalABC.NET 3.3.5, сборка 1644 от 23.03.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var (x,y,z):=ReadInteger3;
Min(x*y*z,x+y+z).Println
end.
160 бит это если не считать пробел перед "я" и после "у" с ними 176
Int get_lessons(int week){
if(week < 1 || week > 7) return 0; // Если ввели не номер дня недели
else if (week == 1) return 6;
else if (week == 2) return 6;
else if (week == 3) return 6;
else if (week == 4) return 6;
else if (week == 5) return 7;
else if (week == 6) return 0;
else return 0;
}
При вводе текста : 1,2 и 4
Верно ли записан текст: верно
Для перемещения в начало: ctrl page up
Сколько начертаний: ф ы в а