заменить положительные элементы двумерного массива размерностью 3 на 4 на 1 а отрицательная на 0. помогите пожалуйста и побыстрее
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
// Pascal ABC.NET
var
arr: Array [1 .. 3, 1 .. 4] of Integer;
i, j: Integer;
begin
// Ввод массива и т.д.
for i := 1 to 3 do
for j := 1 to 4 do
if arr[i, j] > 0 then
arr[i, j] := 1
else if arr[i, j] < 0 then
arr[i, j] := 0;
end.