Неликтен видеоларга аудио асерлер киргиземиз

var

  x,y,z: longint;

begin

  readln(x,y,z);

if (x> 100)or(y> 100)or(z> 100) then writeln('false')

else writeln('true');

end.

пщояк 17 27 16 33 17

нщёп 15 27 7 17

  ответ надо продемонстрировать рисунком, я не умею на компьютере, поэтому рисую такую схему,как разместить зайцев в прямоугольной клетке.

з -это заяц,их должно быть 5:

                                                                                                        три зайца по углам и два у стенок по одному.

                  з                                        з                                    это для малышей,ее каждый ребенок знает.

                                                                з

                  з                        з

var

i,n: integer;

begin

read(n);

for i: =0 to 3 do

writeln (4*n-i);

end.