Дан одномерный массив из 12 случайных чисел в Диапазоне [-50;50]. Отсортировать массив по возрастанию и вывести на экран сообщение «Число нечетное», если 3 элемент в отсортированном массиве нечетный, и «Число четное», если 3 элемент четный.
Паскаль

где-то в начале ii тысячелетия до нашей эры предки финикийцев изобрели алфавит.

само слово "алфавит" восходит к названиям первых финикийских букв: альфа "алеф" (бык) и  бета "бет" (дом). финикийцы дали название каждой букве своего алфавита.

var

  n: integer;

begin

  readln(n);

  writeln(abs(n)-2);

end.

varb: array [1..8] of integer; r,q: integer; begin  for r: =1 to 8 do  begin  q: =0;   read(b[r]);   end;   for r: =1 to 8 do  if b[r] mod 2=1 then q: =q+b[r];   writeln;   writeln('сумма нечетных чисел равна ',q); end.

б< т

к< л

с< е

липа ниже березы

к< л< б< т

сосна выше тополя

к< л< б< т< с< е

самое высокое ель

самое низкое клен