сервис вопросов и ответовДан массив A(5,5). Обнулить главную диагональ массива, если в ней найдется хот бы один отрицательный элемент
10-11 класс|
|
Ирина1601
24 февр. 2014 г., 15:06:15 (10 лет назад)
Хэйзи
24 февр. 2014 г., 16:27:54 (10 лет назад)
var
a:array [1..5,1..5] of integer;
i,j:integer;
f:boolean;
begin
randomize;
f:=false;
writeln ('Исходный массив: ');
for i:=1 to 5 do begin
for j:=1 to 5 do begin
a[i,j]:=random(12)-3;
if (i=j) and (a[i,j]<0) then f:=true;
write (a[i,j]:3);
end;
writeln;
end;
if f=true then begin
writeln ('Полученный массив: ');
for i:=1 to 5 do begin
for j:=1 to 5 do begin
if (i=j) then a[i,j]:=0;
write (a[i,j]:3);
end;
writeln;
end
end else writeln ('На главной диагонали нет отриц. эл.');
readln;
end.
Ответить
Другие вопросы из категории
Читайте также
Сделайте пожалуйста блок-схему или код в small basic. Дан массив из 20 целых чисел. В массиве хранятся результаты соревнований по спортивной стрельбе.
Один элемент массива соответствует количеству очков, набранных одним участником соревнований, и имеет значение от 0 до 30 включительно. Необходимо разработать программу, которая по данным массива вычисляет максимальное количество очков среди участников соревнований, и количество участников набравшее зачётное количество очков. Зачётное количество очков 18. Гарантируется, что хотя бы один участник соревнований набрал зачётное количество очков.
Дан целочисленный массив из 10 элементов.Элементы массива могут принимать целые значения от -50 до 50.Составить программу ,позволяющую найти и
вывести сумму элементов массива которые кратны 7 и оканчиваются на 5 .Гарантируется,что в исходном массиве есть хотя бы один такой элемент.
НА ЯЗЫКЕ ПАСКАЛЬ!!!!
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать значения от –1000 до 1000. Опишите на русском языке или на одном из языков
программирования алгоритм, который находит и выводит среднее арифметическое всех элементов массива, оканчивающихся цифрой 5. Гарантируется, что хотя бы один такое элемент в массиве есть.
НАРОД ПОМОГИТЕ ПОЖАЛУЙСТА
1) Написать программу, которая определяет номера строк двумерного массива A[1..6,1..4], в которых содержится хотя бы один нулевой элемент. 2) 5. Составить
программу заполнения массива B[1..10] таким образом: элементы с нечетными индексами равны числу 2, а элементы с четными индексами равны числу 5.
Дана
целочисленная прямоугольная матрица. Определить количество столбцов, содержащих
хотя бы один нулевой элемент.
Примечание: Размеры
массивов задаются именованными константами. Значения элементов массивов
вводятся с клавиатуры, генерируются случайным образом или инициализируются в
программе (значения по умолчанию). Способ задания элементов массива выбирается
пользователем. Все операции над массивами выполняются отдельными функциями.
Помогите плиззз на Pasca ABC
Вы находитесь на странице вопроса "Дан массив A(5,5). Обнулить главную диагональ массива, если в ней найдется хот бы один отрицательный элемент", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.