Заполнить массив T размерностью M значениями, введенными с клавиатуры.
Вывести на экран в одну строку каждый 2 элемент массива, который больше заданного значения K. (Язык программирования - Паскаль)

Вот. Дружественный интерфейс. Делай лучшим, если помог.program pr;var a:array of integer;t,i,k,m:integer;beginwrite(Размер массива: );readln(t);Setlength(a,t);write(Выводить элемент больше, чем: );readln(k);writeln();writeln(Заполняем массив...);for i:=1 to t do beginwrite(Элемент массива ,i,: );readln(a[i]);end;writeln();writeln(Следующие элементы больше ,k);for i:=1 to t do if a[i]>k then writeln(Элемент ,i,: ,a[i])end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.