Для кружка рисования Айжан создала в таблице модель расчета покупок . Целью моделирования было выяснить стоимость покупки . Определи диапазон ячеек , которые используют тип данных « Число » . A1 : D1 B2 : B5 C2 : 05​

gshwbwvevebsjsksshehhebe

// pascalabc.net 3.2, сборка 1387 от 20.02.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   var a: =readarrinteger('вводите данные: ',n); a.println;   var s: =a.where(x-> (x> 9) and (x< 100) and (x mod 10=7));   if s.count=0 then writeln('таких чисел нет')   else writeln(s.sum) end. пример n= 5 вводите данные: 45 -38 27 -17 47 45 -38 27 -17 47 74 // pascalabc.net 3.2, сборка 1387 от 20.02.2017 // внимание! если программа не работает, обновите версию! function sod(n: integer): integer; begin   var s: =abs(n).tostring;   result: =s.select(c-> c.todigit).sum end; begin   var a: =arrrandom(readinteger('n=',999); a.println;   a: =a.select(x-> sod(; a.println end. пример n= 10 -252 814 -239 -157 792 -223 697 -482 616 -675 9 13 14 13 18 7 22 14 13 18 // pascalabc.net 3.2, сборка 1387 от 20.02.2017 // внимание! если программа не работает, обновите версию! begin   var n: =readinteger('n=');   var a: =readarrinteger('вводите данные: ',n); a.println;   writeln('четных чисел ',a.where(x-> x.iseven).count);   writeln('нечетных чисел ',a.where(x-> x.isodd).count); end. пример n= 16 вводите данные: 34 -345 21321 643 1 0 325 2312 236 -324 -3242 7 12 7 12 50 34 -345 21321 643 1 0 325 2312 236 -324 -3242 7 12 7 12 50 четных чисел 9 нечетных чисел 7