Создать массив 5х6 целых чисел из диапазона [1; 10] вывести его на экран. найти количество и произведение нечетных элементов последней строки вот код программы, где ошибка? ! program p1; uses crt; const n=5; m=6; var a: array [1..n, 1..m] of integer; i, j, p, k: integer; begin randomize; clrscr; writeln('данный массив'); for i: =1 to n do begin for j: =1 to m do begin a[i, j]: =random(10)+1; write(a[i, j]: 4); end; writeln; end; p: =1; writeln('полученный массив'); for i: =1 to n do begin if a[5, j] mod 2=1 then p: =p*a[5, j]; inc(k); writeln('произведение = ', p); writeln('колличество =', k); readln; end; end.

Измени вот этот фрагмент следующим образом: writeln('полученный массив'); for j: =1 to m do   begin   if a[5,j] mod 2=1 then       begin     p: =p*a[5,j];     inc(k);     end;   end; writeln('произведение = ',p); writeln('количество =',k); все будет работать как надо.

Как минимум тут: for i: =1 to n do beginif a[5,j] mod 2=1 then p: =p*a[5,j]; в цикле счетчик i, а массив проверяет по j

Научно-практическая дисциплина, изучающая трудовые процессы с целью создания оптимальных условий труда росту его производительности.

Что бы настроить свое рабочее место нужно что бы у тебя было удобное кресло, что бы ты был доволен своим местом за компьютером ну и конечно надо иметь не плохой компьютер и девайсы !) Нельзя падать с кресла , нельзя кушать за столом , нельзя не протирать все из электронного у тебя на столе ! Честно за долгой работой над компьютером я ничего не делал и со мной все хорошо;Но нужно делать зарядку примерно каждый час! И делать разминку глаз !)

Удачи!

Чем могу, тем : информатика в современном мире имеет огромнейшее значение. технологии буквально везде, соответственно нужно учиться с ними работать. компьютеры сейчас есть в каждом офисе, каждой школе, в медицине используют роботов-хирургов, и это ещё не всё. каждый человек должен научиться выполнять простейшие действия, хотя бы научиться работать с компьютером, это позволит значительно облегчить ряд повседневных действий..чего стоят обычные браузерные поисковики, стоит только задать вопрос и сразу же получишь на него ответ. это удобно, не так ли? (дальше у меня кончилась фантазия, однако материал для размышлений у вас есть)