Напишите программу, которая генерирует список из 20 случайных целочисленных элементов
из диапазона от 1 до 100, определяет и выводит на экран:
а) сумму нечётных элементов;
о) количество двухзначных элементов;
в) минимальный элемент, оканчивающийся на 4.
следует считать, что в списке обязательно есть хотя бы один элемент,
оканчивающийся на 4.

Const
  n = 11;

var
  x: array[1..n] of integer;
  i, k, d, s: integer;

begin
  Randomize;
  Writeln('Элементы массива');
  k := 0; s := 0;
  for i := 1 to n do
  begin
    d := Random(11) - 5;
    Write(d:3);
    if (i mod 2) = 0 then begin { четное место }
      if d = 1 then Inc(k);
      x[i] := d
    end
    else begin
      if d < 0 then s := s + d;
      x[i] := sqr(d)
    end
  end;
  Writeln;
  Writeln('Результирующий массив');
  for i := 1 to n do Write(x[i]:3);
  Writeln;
  Writeln('Количество единиц на четных местах равно ', k);
  Writeln('Сумма отрицательных элементов на нечетных местах равна ', s)
end.

Тестовое решение:
Элементы массива
 -3  0 -5  1  5  1 -3 -4  5 -3 -2
Результирующий массив
  9  0 25  1 25  1  9 -4 25 -3  4
Количество единиц на четных местах равно 2
Сумма отрицательных элементов на нечетных местах равна -13

Выбор профессии очень важен, так как работа должна приносить прибыль, удовлетворяющую потребностям человека, и работая, человек должен чувствовать, что занимается тем, чем хочет, а не тем, чем вынужден.

Мой выбор – IT-специалист.

IT-специалист – профессия очень востребованная и нужная. Многие предприятия заканчивают свое существование без этих сотрудников.

IT-специалисты нужны в любой компании, независимо от масштаба деятельности. Сейчас эта профессия очень востребована, так как в России появляется много заграничных фирм.

Многие в недоумении от моего выбора профессии.

В нашем городе все привыкли к тому, что выпускники наших школ выбирают довольно типичные профессии, такие как врач, парикмахер, риэлтор, адвокат, учитель, бухгалтер и другие. Более того, многие и не подозревают о существовании более интересных профессий, связанных с различными сферами деятельности. Конечно, все перечисленные мной профессии незаменимы в нашей жизни, но, если человек хорошо окончил школу, почему бы не попытаться попробовать свои силы в профессиях более тяжелых умственных ?

Так я и собираюсь поступить.

Возможно, мой выбор многим не понятен, но он мой. Никто не в праве решать за меня, кем я должна работать. Мои родители довольны моим выбором профессии.

Я считаю, что каждый должен выбирать то, что ему близко.

Мне близка работа с компьютером.

Во-первых, компьютер в современном мире – незаменимая вещь, без которой уже трудно жить.

Во-вторых, сейчас не много людей, которые могут профессионально работать с компьютером.

И если очень стараться, то можно многого добиться в жизни.

Она у нас одна, и не стоит растрачивать время, отведенное на жизнь, просто так