[tv999]

Нужно решить задачи.
До этого решал задачи было более менее нормально,а это ,что-то вообще не понятно
1. Для целочисленной матрицы найти для каждой строки число элементов, кратных пяти.
Вывести на матрицу в общепринятом виде.
2. Вычислить z=(Z1+у1)/(Z2—у2), где х1 и Z2— корни уравнения 2х^2+х-4=0,
y1 и y2 — корни уравнения ау2+2y -1=0. Использовать подпрограмму.

[PhoeniX]

С чем проблемы? С вводом данных, расчётом, выводом? Или запуском Delphi?

[tv999]

В первом не могу понять,как сделать это-" Для целочисленной матрицы найти для каждой строки число элементов, кратных пяти."
А во втрой вообще не пойму как написать((((

[PhoeniX]

Ввод матрицы сделай сам.
Потом в цикле пробегаешь по строкам, считаешь в массив, сколько чисел, кратных 5. И потом этот массив выводишь.
Число, кратное 5 - это число, которое делится на 5 без остатка.

Код:

  if Matrix[x,y] mod 5 = 0 then
    ...

[Black Raider]

В чем проблема с 1-м заданием то?
примерно так:

Код:

for i:=1 to 10 do
begin
c[i]:=0;
for j:=1 to 10 do
if (arr[i,j] mod 5)=0 then c[i]:=c[i]+1;
end;

В результате получим массив с в котором будет записано кол-во элементов кратных 5 по каждой строчке.

ПС. если посчитает столбцы то в условии i и j поменяйте местами, давно с матрицами не возился не помню что там вначале, столбцы или строки