Напишите программу, которая заполняет массив из N=10 случайными числами в диапазоне {100;300} и выводит его на экран. После этого на экран выводятся средние цифры(число десятков) всех чисел, записанных в массив.
Пример:
Массив: 142 324 135 257
Число десятков: 4 2 3 5

спасибо!

что так сложно то(ааа)

const n=10;var a: array [1..n] of integer;i: integer;beginfor i:=1 to n doa[i]:=random(100,300);writeln (a);for i:=1 to n dowrite (a[i] div 10 mod 10,'  ')end.

//PascalABC.NET//Версия 3.3.5, сборка 1650beginwrite('массив: ');var a:=ArrRandom(10,100,300).Println;write('число десятков: ');a.ForEach(x->write(x.ToString[2],' '));end.