Дан двумерный массив размером 10*10. Вывести на экран часть массива расположенную выше главной диагонали. Массив заполняется случайными числами.

@-=Камилла=- · Регистрация: 09.05.2011

Студворк — интернет-сервис помощи студентам

@KaiTheCat · 09.05.2011, 14:35

Pascal

var
   a: array[1..10,1..10] of integer;
   i,j: byte;
begin
   randomize;
   for i:=1 to 10 do
      begin
         for j:=1 to 10 do
            begin
                a[i,j]:=random(71)-35;
                write(a[i,j]:4);
            end;
         writeln;
      end;
   writeln;
   for i:=1 to 10 do
      begin
         for j:=1 to 10 do
            if i<j then writeln(a[i,j]:4);
         writeln;
      end;
   readln
end.

@-=Камилла=- 0 / 0 / 0 Регистрация: 09.05.2011 Сообщений: 4
		1
	Дан двумерный массив размером 1010. Вывести на экран часть массива расположенную выше главной диагонали. Массив заполняется случайными числами. 09.05.2011, 12:30. Показов* 6389. Ответов 1 Метки нет (Все метки) Дан двумерный массив размером 10*10. Вывести на экран часть массива расположенную выше главной диагонали. Массив заполняется случайными числами. 0

Опции темы

Дан двумерный массив размером 10*10. Вывести на экран часть массива расположенную выше главной диагонали. Массив заполняется случайными числами.

Решение