Дан массив размерностью 5х5 .Заполнить его так,чтобы по диагонали были 1,а остальные - 0
5-9 класс
|
Oxana250672
09 марта 2017 г., 10:00:03 (7 лет назад)
Almaanh
09 марта 2017 г., 11:18:25 (7 лет назад)
program matrix1;
type
matrix= array [1..5, 1..5] of integer;
var
a : matrix;
i, j: integer;
begin
for i :=1 to 5 do begin
writeln (' ');
for j :=1 to 5 do begin
if i=j then a[i, j]:=1 else a[i, j]:=0;
write (a[i,j], ' ');
end;
end;
end.
Ответить
Другие вопросы из категории
Дан массив целых чисел.Найти max и min значения среди чисел,принадлежащих интервалу [a;b]. Числа a и b вводятся с клавиатуры. Предполагается, что такие чис
ла в массиве есть.
Читайте также
1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
ввести массив A(N). Преобразовать его так, чтобы значения элементов являлись суммой элемента массиваи его индекса. Вывести на печать исходный и
преобразованный массив
1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.
2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.
Решить задачи на языке программирования в Turbo Pascal: 1) Дан массив, состоящий из 10 чисел, значения могут быть
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
Вы находитесь на странице вопроса "Дан массив размерностью 5х5 .Заполнить его так,чтобы по диагонали были 1,а остальные - 0", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.