Создан заказ №3740281
16 марта 2019
Записать на место положительных элементов матрицы нули а на место положительных - единицы
Как заказчик описал требования к работе:
Выполнить несложные 4 задания с номерами 6,26, 46,66 в формате ворда .
Фрагмент выполненной работы:
Записать на место положительных элементов матрицы нули, а на место положительных - единицы. Вывести на печать нижнюю треугольную матрицу в общепринятом виде.
Решение:
Программа
uses crt;
var
a:array[1..100,1..100] of integer;
i,j,n:integer;
begin
clrscr;
write('Введите сторону квадратной матрицы=');
read(n);//читаем размер матрицы
writeln('Исходная матрица');
randomize;//подключаем генерацию псевдослучайных чисел
for i:=1 to n do
begin
for j:=1 to n do
begin
a[i,j]:=random(51)-10;//присваиваем элементам матрицы значения от -10 до 40
write(a[i,j]:4); //выводим строки матрицы
end;
writeln;//переход на новую строку
end;
for i:=1 to n do
for j:=1 to n do
begin
if (a[i,j]<0) then a[i,j]:=0;//если элемент меньше 0 заменяем на 0
if (a[i,j]>0) then a[i,j]:=1;//если больше 0, заменяем на 1
end;
writeln('Замена элементо..Посмотреть предложения по расчету стоимости
Заказчик
заплатил
заплатил
200 ₽
Заказчик не использовал рассрочку
Гарантия сервиса
Автор24
Автор24
20 дней
Заказчик принял работу без использования гарантии
17 марта 2019
Заказ завершен, заказчик получил финальный файл с работой
5
Записать на место положительных элементов матрицы нули а на место положительных - единицы.docx
2019-03-20 10:47
Последний отзыв студента о бирже Автор24
Общая оценка
5
Положительно
Замечательный,отзывчивый автор.Все в срок (даже раньше) и по доступной цене. Рекомендую всем!!!
Хочешь такую же работу?
300 ₽
