В таблице Dat хранятся данные о численности учеников в классах (Dat[l] - число учеников в первом классе, Dat[2] - во втором и т. д. Определите, какое число будет напечатано в результате работы следующей программы. целтаб Dat[1:11] цел к, ш Dat[1]:=21 Dat[4]:=19 Dat[7]:=23 Dat[10]:=29 Dat[2]:=23 Dat[5]:=25 Dat[8]:=21 Dat[11]:=19 Dat[3]:=20 Dat[6]:=22 Dat[9]:=22 ш:=0 нц для к от 1 до 11 если Dat[к]>22 то ш:=ш+1 Все кц вывод ш ответ:

ответ: 4Объяснение:

Создаём массив из 11 элементов, который называем Dat:

целтаб Dat[1:11]

Объявляем переменные к и ш, являющимися целыми числами:

цел к, ш

Заполняем массив Dat:

Dat[1]:=21 Dat[4]:=19 Dat[7]:=23 Dat[10]:=29 Dat[2]:=23 Dat[5]:=25 Dat[8]:=21 Dat[11]:=19 Dat[3]:=20 Dat[6]:=22 Dat[9]:=22

Присваиваем переменной ш значение 0.

ш:=0

Объявляем цикл от 1 до 11, то бишь пробегаемся по массиву Dat и смотрим, если значение элемента больше 22, то прибавляем к переменной ш 1:

нц для к от 1 до 11 если Dat[к]>22  то    ш:=ш+1 Все кц

Выводим на экран значение переменной ш:

вывод ш

Таким образом мы видим, что программа подсчитывает количество классов в которых больше 22 учеников. Таких классов будет 4: 2(23), 5(25), 7(23) и 10(29).

(см. объяснение)

Объяснение:

program task;

var i: integer;

const N=5;

procedure writeOut(i: integer);

begin

 if(i<N) then write(', ')

 else writeln('.');

end;

begin

 if(N<1) then begin writeln('N>0 и целое!'); exit; end;

 writeln('ЦИКЛ FOR:');

 for i:= 1 to N

   do begin

        write(i); writeOut(i);

      end;

 writeln;

 writeln('ЦИКЛ WHILE:');

 i:= 1;

 while(i<N+1)

   do begin

        write(i); writeOut(i);

        i:= i+1;

      end;

 writeln;

 writeln('ЦИКЛ REPEAT:');

 i:= 1;

 repeat

   write(i); writeOut(i);

   i:= i+1;

 until i=N+1;

end.

Списать текст, вставить пропущенные буквы, расставить знаки препинания.                        

                                      РУССКАЯ ЗИМА.

Хороши снежные зимы в Росси…! (Не)погоду см..няют ясные дни. Бл..стят на солнце глубокие сугробы скрылись (подо)льдом большие реки и маленькие реч…нки.  Пр…пор…шила зима землю снежной шубкой. Отдыхает земля набирает силу.

Наполняе(тся, ться) жизнью зимний лес. Вот простучал по сухому дереву дятел. По всему лесу отбивает дробь лесной барабан…ик. С шумом пролетит рябчик подним…(тся, ться) из снежной пыли глухарь. Стайка пестрых клестов ра(с,з)селась на ветках ели. Стоиш… и любуеш…ся как ловко они вонзают свои клювики в шишки выб…рают из них с…м..на. С су чка на суч…к перепрыгивает шустрая белка.

Вот пр…летела большая сова и подала голос. Ей отозвались другие совы. Пискнула тихонько лесная мыш… пробежала по снегу и скрылась под пнем в сугробе.  

Объяснение: