сервис вопросов и ответовДан двумерный массив размерностью n*m. Заменить все отрицательные элементы на противоположные.(помогите составить программу для паскаля).
5-9 класс|
|
FANTAKATE
09 сент. 2013 г., 5:52:46 (10 лет назад)
НінаДобрев
09 сент. 2013 г., 7:56:31 (10 лет назад)
const NN=50;
var
a:array [1..NN,1..NN] of integer;
i,j,m,n:integer;
begin
write('Введите n: ');
readln(n);
write('Введите m: ');
readln(m);
for i:= 1 to n do
for j:= 1 to m do
readln(a[i,j]);
for i:= 1 to n do
for j:= 1 to m do
if a[i,j]<0 then a[i,j]:=abs(a[i,j]);
for i:= 1 to n do
begin
for j:= 1 to m do
write(a[i,j],' ');
writeln;
end;
end.
2583691471
09 сент. 2013 г., 9:02:20 (10 лет назад)
Program a1;
Uses crt;
const n=8;
m=8;
Var a:array[1..n,1..m] of integer;
i,j:byte;
Begin
Writeln('Исходная матрица');
For i:=1 to n do
begin
Writeln;
For j:= 1 to m do
begin
a[i,j]:=random(101)-50;
Write(a[i,j],' ');
end;
end;
Writeln;
Writeln('Отредактированная матрица');
For i:=1 to n do
begin
Writeln;
For j:= 1 to m do
begin
If a[i,j]<0 then a[i,j]:=abs(a[i,j]);
Write(a[i,j],' ');
end;
end;
End.
Ответить
Другие вопросы из категории
Составьте программу, которая заполняет массив A[1..10] случайными целыми числами в диапазоне от 1 до 50 и вычисляет среднее арифметическое элементов с
чётными значениями элементов массива.
1. Определите тип выравнивания для каждого из приведённых ниже фрагментов:
Фрагмент 1
Для представления текстовой информации в компьютере используется алфавит мощностью 256 символов. Двоичный код каждого символа в ком-пьютерном тексте занимает 1 байт памяти.
Фрагмент 2
Таблица кодировки – это таблица, в которой всем символам компьютер-ного алфавита поставлены в соответствие порядковые номера и их двоичные коды.
Фрагмент 3
Все символы кодировочной таблицы пронумерованы от 0 до 255. Каждому номеру соответствует двоичный код от 000000000 до 111111111. Для разных типов ЭВМ существуют разные таблицы кодировки. Для компьютеров типа IBM PC международным стандартом стала кодировочная таблица ASCII (American Standart Code for Information Interchange).
Фрагмент 4
Первая половина этой таблицы имеет международный стандарт (символы от 0 до 127), вторая половина называется кодовой страницей и существует в различных вариантах
Читайте также
Дан одномерный массив B из N элементов, значения которых находятся в диапозоне от 0 до 325.
1) Заменить все чётные элементы на их номера. Вывести на экран исходный и новый массив.
2) Заменить все чётные элементы, стоящие на нечетных местах, на их номера.
1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
Помогите решить, буду очень благодарен.
1. Дан массив, найти произведение отрицательных элементов массива.
2. Дан массив, заменить все отрицательные элементы массива их модулями
1)Составьте программу,которая заполняет массив e[1..11] случайными целыми числами в диапазоне от -15 до 1 и находит количество элементов кратных 5.
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.
Вы находитесь на странице вопроса "Дан двумерный массив размерностью n*m. Заменить все отрицательные элементы на противоположные.(помогите составить программу для паскаля).", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.