Program uborka; var a,b,c: integer; //количество вещей в стопках k: real; //минимальное количество ходов. вещественное, т.к. результат деления sa: integer; //среднее арифметическое. к-во вещей должное быть в каждой стопке begin writeln ('введите a, b и c через пробел'); readln (a, b, c); if ((a+b+c) mod 3) = 0 //если сумма вещей делится на 3 нацело then begin sa:=((a+b+c) div 3); //среднее арифметическое выражаю через результат целочисленного деления, т.к иначе конфликт типов k:=(abs(sa-a)+abs(sa-b)+abs(sa-c))/2; //к-во шагов - это половина суммы модулей разности СА и каждой полки writeln (k) end else writeln ('IMPOSSIBLE') end.
program shariki; {n - всего шариков (от 0 до 100 вкл) a - время на надувание 1-го шарика (от 1 до 100 вкл) k - мах кол-во шариков, которое понадобится надуть одному из 2-ух мальчиков t - мин кол-во времени на надувание всех шариков двумя мальчиками} var n, a, k, t: integer; begin writeln ('введите n и a через пробел'); readln (n,a); k:=(n div 2)+(n mod 2);//делим к-во шариков на 2 мальчика и прибавляем лишний при наличии t:=k*a; writeln (t) end.
program otoplenie; {k - кол-во кубометров на 1 батарею (<=2*109) h - высота комнаты (<=105) w - ширина комнаты (<=105) l - длина комнаты (<=105)} var h, w, l, k, v, n: integer; begin writeln ('введите h, w, l, k через пробел'); readln (h, w, l, k); n:=((h*w*l) div k); if ((h*w*l) mod k)>0 then n:=n+1; {делим объем комнаты на объем воздуха для одной батареи (берем только целую часть). если нацело не делится, то к целому от деления прибавляем еще 1 батарею для обогрева остатка} writeln (n) end. здесь, как я понимаю, вводимые данные не могут быть <= нулю, поэтому нулевые и отрицательные варианты не рассматривались
Обозначим скорость автомобиля х км/ч. За 19 мин 10 сек = 1150 сек = 23/72 часа он уехал на 23x/72 км. За время t автомобиль проехал xt км до С, а мотоциклист за это же время t проехал xt + 23x/72 км со скоростью 308/3 км/ч. 308t/3 = xt + 23x/72 Затем мотоциклист вернулся в А, проехав опять 308t/3 км за время t. А автомобиль за это же время t проехал оставшееся расстояние до В. То есть автомобиль ехал время 2t + 23/72 часа x = 131 / (2t + 23/72) Подставляем 308t/3 = 131t/(2t + 23/72) + 23/72*131/(2t + 23/72) 308t*72(2t + 23/72) = 131t*72*3 + 23*131*3 308*144t^2 + 308*23t = 131*216t + 69*131 44352t^2 + 7084t - 28296t - 9039 = 0 44352t^2 - 21212t - 9039 = 0 Ну и уравнение! D/4 = 10606^2 + 44352*9039 = 112487236 + 400897728 = 513384964 D/4 = 22658^2 t1 = (21212 - 22658)/44352 < 0 - не подходит t2 = (21212 + 22658)/44352 = 43870/44352 = 21935/22176 часа Мотоциклист за это время проехал расстояние АС, которое надо найти. AC = 308t/3 = 308*21935/(3*22176) = 21935/(3*72) = 21935/216 км.
