255 1
;
1) 4 + 5
9
2) 9-42
17
17
음
6
2.
+3
3) 5
11
S;
8
15
+ 104
5) 20 - 3
15;
6) 30 -152-12-05
151
- 4% +3
9
4
4
+3
16 11
7) 15
8) 49-193
2
5
25
9) 12
13
2.
+3
20
10) 2911
1
13
13
4.
17
5
+10
17
24
13, Bal​

Однажды когда я гулял со своими друзьями на улице,а это была холодная зима,мы с ребятами решили зайти в магазин и погреться ну и взять что-то вкусного,но когда мы стояли в очереди мы заметили как один взрослый мужчина тянет руку к печенью,мы сначала не обратили так сильно на это внимание,мы подумали что он просто хочет взять пакет и понести на весы,но мы ошибались он взял пакет,и начал потихоньку выходить из очереди,а магазин был не большой и видео камер там не было,мы сразу же сообщили об воровстве продавцу этого магазина,а продавца звали Нина Александровна она сразу же кинулась за преступником,когда она его догнала,вор сразу начал оправдываться что он ничего не крал и он за это печенье заплатил,но продавец конечно же поверил нам и Нина Александровна не стала вызывать милицию и простила вора,но он сразу же заплатил за это печенье и пообещал больше ни когда так не делать,но пподавщица поставила условие,что если она хоть раз еще увидит что он пытается что-то украсть,она сообщит в полицию и его заберут на сутки в камеру,а нас Нина Александровна поблагодорила и угостила конфетами

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.
здесь, как я понимаю, вводимые данные не могут быть <= нулю, поэтому нулевые и отрицательные варианты не рассматривались