База данных "зоопарк" содержит в полях животное, тип, количество сведения о наименовании животного, типе его рациона (возможны два типа: п - плотоядное илит - травоядное) и количестве пищи в день. составьте запрос, для получения информации о животных, в день от 5 до 10 кг мясных продуктов

select * from "зоопарк" where "количестве пищи в день" between 5 and 10

Из чего что получается, при пробежке от 100 до 999 [184, 129] [275, 129] [366, 129] [390, 129] [399, 1812] [457, 129] [481, 129] [548, 129] [572, 129] [639, 129] [663, 129] [754, 129] [845, 129] [920, 112] [930, 123] [936, 129] [993, 1812] общее кол-во {129=> 13, 123=> 1, 1218=> 0, 1812=> 2, 312=> 0, 912=> 0, 112=> 1} ответ 4 числа код def avtomat2(chislo)       return 0 if ! chislo.between? (100, 999)       s = chislo.to_s       a = s[0].to_i + s[1].to_i       b = s[1].to_i + s[2].to_i       s = [a, b].max.to_s + [a, b].min.to_s       return s.to_i end def zadanie(min, max, numbers)       b = hash.new       numbers.each do |w|             b.store(w, 0)       end       for i in min..max             r = avtomat2(i)             if numbers.include? (r)                   p [i,r]                   b[r] += 1             end       end       return b end # # # примеры применения p zadanie(100, 999, [129, 123, 1218, 1812, 312, 912, 112])

// pascalabc.net 3.0, сборка 1076 var   s,ss: string;   i,n,p: integer; begin   write('введите строку: '); readln(s);   n: =length(s); p: =pos(',',s);   if p in [1..n-1] then begin       ss: =copy(s,p+1,n-p);       n: =length(ss); p: =pos(',',ss);       if p=0 then writeln(ss)       else writeln(copy(ss,1,p-1))       end   else writeln('*** нечего выводить ***') end.           тестовые решения: введите строку: 01234,45679,1011213,14151617 45679 введите строку: 01234,45679101121314151617 45679101121314151617 введите строку: 01234, *** нечего выводить ***