Составить алгоритм для выведения на экран (1,2) (1,3)…(1..n-1) (1,n)
(2,3)…(2..n-1) (2,n)

(n-1,n)

Через Pascal

kornienko123456 kornienko123456    1   22.12.2020 00:23    1

Ответы
sofiyamotkova sofiyamotkova  12.02.2021 20:53

program mas;

var n, i, j: integer;

begin

 readln(n);

 for i:=1 to (n-1) do

 begin

   for j:= i+1 to n do

   begin

     write('(', i,',', j, ')');

   end;

 end;

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика