1)
var
a: array[1..10,1..10] of integer;
i,j: integer;
begin
randomize;
for j: =1 to 10 do
for i: =1 to 10 do
a[i,j]: =random(51);
for i: =1 to 10 do
write(a[i,4);
end.
2)
var
n,max,i: integer;
a: array[1..n] of integer;
begin
max: =0;
read(n);
for i: =1 to n do
read(a[i]);
for i: =1 to n do
if a[i]> max then max: =a[i];
write(max);
end.
Произведение построено на описании экстремальной ситуации, в которой обычные люди проявляют свои лучшие или худшие качества. В повести «Пожар» автор показал состояние общества в российской глубинке в послевоенные годы.
В поселке загорелись склады. На них хранилось большое количество продовольствия, в том числе дефицитных продуктов, таких как колбаса, икра, а также много водки. Вид продуктов, которые обычным людям доводилось потреблять далеко не каждый день, в сочетании с неразберихой был большим искушением, которое заставило многих разворовывать государственное имущество. Больше все в этом преуспели уголовные элементы, именуемые в повести архаровцами. Этим сюжетом Распутин желал показать, насколько тонка грань, отделяющая обычного законопослушного человека от преступника, непрочность моральных принципов у многих. Ведь и архаровцы, до пожара работали и вели обычный образ жизни, а в ходе пожара дело окончилось дракой с двумя трупами.
Писатель показал также разное отношение людей в сложной ситуации. В то время как главный герой Иван Петровичи некоторые другие, падая с ног от усталости государственное имущество, зная, что вряд ли получат за это что-либо существенное, а кладовщица Валя умоляла вытащить самое ценное, многие отлынивали.
Повествование постоянно прерывается лирическими размышлениями главного героя, через которые писатель высказывает свои собственные взгляды на происходящее.
Здесь звучит и экологическая тематика: жизнь стала разрушаться после того, как начали массово вырубать лес (действие происходит в леспромхозе). Возможность заработать на этом большие деньги привела в поселок так называемых архаровцев, ставящих во главу угла только свои личные интересы вырубая лес, человек становится разрушителем природы, он, в отличие от крестьянина, заботящегося о своем поле, ничего не дает природе взамен. Лирический герой приходит к выводу, что именно в таком потребительском отношении и причина того, что поселок не развивается, все убого и уныло вокруг.
Поделитесь своими знаниями, ответьте на вопрос:
Решить на массивы в решать не объяснили, а принести уже завтра 1)заполните случайными числами целочисленный массив 10 на 10.выведите на экран четвертую строку массива. 2)дан целочисленный массив, содержащий n элементов и заполненный с клавиатуры.найти наибольшее значение элемента массива.
согласно правилам сервиса в одном вопросе нельзя задавать больше одного , так что я решаю 2.
2)
var a: array[1..n] of integer;
i,max: integer;
begin
for i: =1 to n do
readln(a[i]);
max : = a[1];
for i: =2 to n do
if a[i]> max then max: =a[i];
writeln('max = ', max);
end.