Дан целочисленный двумерный массив, размерности n х m. Заменить все отрицательные числа нулем

Дан целочисленный массив В [1..4, 1..3]. Заменить все его элементы их квадратами.
27.04.2011, 18:13. Просмотров 4323. Ответов 2
Метки нет (Все метки)
решите задачу с помощю подпрограммы.

Задача (290):

Дан целочисленный массив В [1..4, 1..3]. Заменить все его элементы их квадратами.
0
Лучшие ответы (1)
Сообщение: #1593172
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
27.04.2011, 18:13
Ответы с готовыми решениями:
дан целочисленный массив заменить в нём все элементы
. Дан целочисленный массив X. Заменить в нем все элементы, меньшие 5 числом 111.(маасивы...

Дан целочисленный двумерный массив, размерности n х m. Заменить все элементы на их противоположные значения
Дан целочисленный двумерный массив, размерности n х m. Заменить все элементы на их противоположные...

Дан целочисленный массив. Вывести все его нечетные элементы и их количество
Дан целочисленный массив. вывести все его нечетные элементы и их количество

Дан массив А (20), в данном массиве все положительные элементы заменить их квадратами и подсчитать сумму элементов полученного массива.
Дан массив А (20), в данном массиве все положительные элементы заменить их квадратами и подсчитать...

2
Small Lamer
143 / 143 / 141
Регистрация: 05.04.2011
Сообщений: 270
27.04.2011, 18:172
Лучший ответ Сообщение было отмечено Дмитрий1818 как решение
Решение
PascalВыделить код
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var a:array[1..10,1..10] of longint;
n,m,i,j:longint;
begin
n:=4;m:=3;
for i:=1 to n do
for j:=1 to m do
begin
read(a[i,j]);
a[i,j]:=sqr(a[i,j]);
end;
for i:=1 to n do begin
for j:=1 to m do
write(a[i,j],' ');
writeln;
end;
end.