Статистика
Всего в нашей базе более 4 327 663 вопросов и 6 445 976 ответов!

Дан массив размерностью 5х5 .Заполнить его так,чтобы по диагонали были 1,а остальные - 0

5-9 класс

Oxana250672 09 марта 2017 г., 10:00:03 (7 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
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.

Ответить

Читайте также

1.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами до 50. Найти сумму всех четных элементов массива и их количество.

2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.

1). Дан массив из n элементов (n >= 4). Подсчитать среднюю арифметическую второго и предпоследнего элемента массива.

2). Дан массив из n элементов. Написать программу подсчитывающую произведение элементов массива.

Решить задачи на языке программирования в Turbo Pascal: 1) Дан массив, состоящий из 10 чисел, значения могут быть

от -100 до 100. Определить минимальное положительное число.

2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.



Вы находитесь на странице вопроса "Дан массив размерностью 5х5 .Заполнить его так,чтобы по диагонали были 1,а остальные - 0", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.