// PascalABC.NET 3.0, сборка 1144 от 16.01.2016 begin var n:=ReadInteger('n='); var a:=ArrRandom(n,-50,50); Writeln('Исходный массив'); a.Println; var se:=a.Where(x->x mod 3=0); if se.Count=0 then Writeln('В массиве нет элементов, кратных трем') else begin var b:=se.Max; var i:=0; while a[i]<>b do Inc(i); if i=n-1 then Writeln('Максимальный элемент - последний') else begin Writeln('Результирующий массив'); a[i+1]:=abs(a.Where(x->x<0).Sum); a.Println end end end.
а) електронні послуги.
Можливості здійснення електронного урядування - пошук необхідних електронних послуг,можливість пошуку за категоріями.
б) відкритість даних.
Можливості здійснення електронного урядування - Пошукові набори даних ; просмотр,так званого "Хіду виконання" державних розпоряджень.
в) залучення громадян до управління.
Можливості здійснення електронного урядування - пошук необхідної інформації за такими групами:
"Актуально ";
"Консультації з громадськістю ";
"Анонси ";
"Сприяння розвитку громадянського суспільства ";
"Громадські ради ";
"Нормативно-правова база ";
"Партнерство «Відкритий Уряд»" ;
"Рада голів громадських рад при органах виконавчої влади ";
"Громадська експертиза органів виконавчої влади ";
"Публічні звіти органів виконавчої влади ";
"Рекомендації та іноземний досвід".
г) електронний документообіг.
Можливості здійснення електронного урядування - Пошук необхідних нормативно-правових актів.