Даны числа x1,y,x2,y2,x3,y3.определите лежит ли точка (x1,y1) внутри или вне прямоугольника, стороны которого паралельны осям кординат,а противолежащие вершины имеют координаты (x2,y2,) и (x3,y3)
276
329
Ответы на вопрос:
Вот наполнение массива рандомом. если нужно наполнение с клавиатуры, то вместо a[i,j]: =random(100)-50; необходимо поставить read(a[i,j]); const n=3; m=4; var a: array[1..n,1..m] of integer; var i, j, count: integer; begin count: =0; for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(100)-50; write(a[i,j]: 3, ' '); end; writeln; end; for i: =1 to n do for j: =1 to m do begin if (a[i,j]< 0) and (a[i,j] mod 2 < > 0) then count: =count+1; end; writeln('количество отрицательных нечетных элементов: ', count); end.
Популярно: Информатика
-
какм102.05.2020 00:41
-
LunnayaLiliya24.04.2021 09:38
-
Поворозник13.04.2022 04:19
-
ddawka16.03.2021 20:11
-
ymnick22801.10.2021 23:03
-
dshaa1431.12.2020 23:47
-
camsuen10110.12.2021 06:52
-
mariya19121514.04.2020 16:49
-
батуми131.01.2023 16:04
-
боб6812.04.2022 21:43