Дано натуральні числа k i d. Визначте, скільки існує k-значних натуральних чисел, сума цифр яких дорівнює 4. Запис натурального числа не може
починатися з цифри 0.

Модификация(көне латынша modіfіcatіo, латынша modus – өлшем, түр және fаcіo – жасаймын) – организмнің белгілері мен қасиеттерінің (фенотипінің) сыртқы орта факторларының әсерінен генотипке байланыссыз (тұқым қуаламай) өзгеруі. Модификациялық өзгергіштікті тудырушы факторларға сыртқы ортаның температурасы, жарық, қоректену жағдайы, т.б. жатады. Модификацияға ұшырамайтын белгі не қасиет болмайды, бірақ организмнің әрбір белгісінің өзгеруінің белгілі бір шегі болады, оны өзгергіштіктің реакция нормасы деп атайды. Организмдегі әр түрлі белгілердің реакция нормасы түрліше болады. Мысалы, сиырдың сүттілігінің реакция нормасы жоғары болады, ал сүтінің майлылығы мал тұқымына тән тұрақты қасиет. Бірақ сиырды дұрыс бағып-күтсе, оның сүттілігін арттырып, сүтінің майлылығын жоғарылатуға, яғни өзгертуге болады. Ал сиырдың түсін (реңін) алатын болсақ, ол өте аз өзгереді, яғни реакция нормасы өте төмен. Модификация мутациялық өзгергіштік сияқты тұқым қуаламайды, бірақ ұзақ уақыт сақталуы мүмкін. Модификация организмнің онтогенез барысындағы өзгеруінің сыртқы орта факторына бейімделуін қамтамасыз етеді.

// PascalABC.NET 3.0, сборка 1139 от 10.01.2016
begin
  var n:=ReadInteger('Количество элементов в массиве: ');
  var a:=ArrRandom(n,-50,50);
  a.Println(',');
  Writeln('Четные элементы: ');
  var i:=1;
  while i<n do begin Write(a[i],' '); Inc(i,2) end;
  Writeln;
  Writeln('Нечетные элементы: ');
  i:=0;
  while i<n-1 do begin Write(a[i],' '); Inc(i,2) end;
  Writeln
end.

Тестовое решение:
Количество элементов в массиве:  10
15,-18,-29,-25,46,21,-8,-17,-9,15
Четные элементы:
-18 -25 21 -17 15
Нечетные элементы:
15 -29 46 -8 -9