Дано массивы A1(N1,M1), A2(N2,M2), A3(N3,M3). Вычислить х=х1+х2+х3 и у=у1+у2+у3, где х1,х2 и х3 - количество единиц в четных столбцах массивов А1, А2, А3. Соответственно у1, у2 и у3 - количество двоек в нечетных столбцах этих м...
Дано массивы A1(N1,M1), A2(N2,M2), A3(N3,M3). Вычислить х=х1+х2+х3 и у=у1+у2+у3, где х1,х2 и х3 - количество единиц в четных столбцах массивов А1, А2, А3. Соответственно у1, у2 и у3 - количество двоек в нечетных столбцах этих массивов. Определить количество единиц в четных столбцах и двоек в нечетных столбцах. Оформить в виде подпрограммы.
Ответ(ы) на вопрос:
Программа на PascalABS
В ней использованы две подпрограммы massiv и dva
Первая задает массивы( размерность задается с клавиатуры через пробел)
Вторая вычисляет "1" и "2"
Не нашли ответ?
Похожие вопросы