Предмет: Информатика, автор: litvinov159

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

Ответы

Автор ответа: igroman95
0
Вот. Дружественный интерфейс. Делай лучшим, если помог. program pr; var a:array of integer;t,i,k,m:integer; begin write('Размер массива: '); readln(t); Setlength(a,t); write('Выводить элемент больше, чем: '); readln(k); writeln(); writeln('Заполняем массив...'); for i:=1 to t do begin write('Элемент массива ',i,': '); readln(a[i]); end; writeln(); writeln('Следующие элементы больше ',k); for i:=1 to t do if a[i]>k then writeln('Элемент ',i,': ',a[i]) end.
Автор ответа: litvinov159
0
От души, по - братски благодарю!!!)))))))
Автор ответа: igroman95
0
Сделай ответ лучшим. Очки не помешают)
Похожие вопросы
Предмет: История, автор: orlenkok03
Предмет: Обществознание, автор: Sasha1111ыф
Нужно составить план текста Под угрозой сейчас находится большинство оставшихся высших видов растений и животных. Те из них, которые человек избрал для удовлетворения своих потребностей, давно уже гибридизированы, приспособлены к его требованиям и выхолены с единственной целью - производить для него как можно больше пищи и сырья. На них уже более не распространяется дарвиновский закон естественного отбора, который обеспечивает генетическую эволюцию и приспособляемость диких видов. (А ведь до сих пор так и неизвестно, в какой мере одомашнивание снижает со временем сопротивляемость к болезням и паразитам.) Впрочем, и те виды, которым человек не смог найти непосредственного применения, тоже обречены. Их естественная обитель и их ресурсы были отняты и безжалостно разрушены в целеустремленном продвижении человечества вперед. Не менее печальная участь ждет и нетронутую дикую природу, которая все еще нужна как естественная среда обитания самого человека, для его физической и духовной жизни. Однако поднятая человеком грозная волна, если ее не приостановить, неминуемо настигнет и его самого. Ведь человек является результатом длительной естественной эволюции - процесса, в котором, как в сложнейшей ткани, тесно и прихотливо переплелись жизни тысяч и тысяч организмов. Сможет ли он сам выжить в роскошном замке, куда добровольно заточил себя, отгородившись от всего живого мира, взяв с собой лишь нескольких приближенных? Никогда еще судьба человека не зависела в такой степени от его отношения ко всему живому на Земле. Ведь, нарушая экологическое равновесие и непоправимо сокращая жизнеобеспечивающую емкость планеты, человек таким путем может в конце концов сам расправиться со своим собственным видом не хуже атомной бомбы. И это не единственное, в чем новая благоприобретенная мощь человека отразилась на его собственном положении. Современный человек стал дольше жить, что привело к демографическому взрыву. Он научился производить больше, чем когда бы то ни было, всевозможных вещей, и к тому же в значительно более короткие сроки. Уподобившись Гаргантюа, он развил в себе ненасытный аппетит к потреблению и обладанию, производя все больше и больше, вовлекая себя в порочный круг роста, которому не видно конца. Родилось явление, которое стали называть промышленной, научной, а чаще научно-технической революцией. Последняя началась тогда, когда человек понял, что может эффективно и в промышленных масштабах применять на практике свои научные знания об окружающем мире. Этот процесс идет сейчас полным ходом и все набирает и набирает скорость.