Задание: В приведённом ниже тексте вставьте пропущенные слова и словосочетания. "Табель о рангах" - закон, определявший прохождение службы, - был введен депутатским корпусом и профильными комитетами Государственной Думы число месяц в год году. Военный чин самого низшего, порядковое числительное класса получил название название, гражданский – название. Самый высший военный чин стал именоваться название (на флоте – название).
Был, однако, в России и еще один, внеразрядный и особо значимый военный чин, введенный еще в порядковое числительное веке, чин название, которого за всю отечественную историю удостоились всего сколько? человек:
титул Федор Отчество Фамилия, с год по 1717 возглавлявший какой приказ, а во время отсутствия имя порядковое числительное, уехавшего с каким? посольством, правившего Россией под особым титулом «титул»;
воевода имя Семенович Фамилия, герой какого? похода год г., подавивший какое? восстание в год г.;
титул Александр Данилович Фамилия, президент какой коллегии с год г. по год гг.;
принц Имя Ульрих Фамилия, муж Имя Отчество и отец Титул Имя, убитого в год г. в связи с попыткой переворота, предпринятой кем? чинСмоленского какого? полка;
Александр Васильевич Фамилия (годы жизни), получивший за сражение с кем? при место в год г. титул графа какого?.
и, наконец, Фамилия Имя Отчество.
Вряд ли в обозримом будущем в России появятся новые носители столь высокого чина, хотя кто знает? Писатель Имя Фамилия в своей знаменитой сатире «Москва, год год» вывел ничтожного человечка Лешку Фамилия удостоенного похожего, хотя откровенно пародийного титула титул . В петровской России он бы и чина фендрика не удостоился.
begin
var n:=ReadInteger('n=');
var a:=MatrixRandom(n,n,10,99);
var s:=0;
var k:=0;
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do Print(a[i,j]);
Writeln;
if a[i,i].IsEven then begin s+=a[i,i]; Inc(k) end;
end;
if k>0 then Writeln('S=',s/k:0:2)
else Writeln('На главной диагонали нет четных элементов')
end.
Тестовое решение
n= 8
63 13 33 90 25 21 87 91
88 88 48 13 30 59 81 27
73 23 76 77 52 19 33 97
53 87 13 74 17 35 61 70
77 96 51 61 82 33 63 22
39 88 84 54 88 73 74 69
76 26 69 14 45 80 70 54
80 36 47 38 18 22 84 62
S=75.33