Составить алгоритм для выведения на экран
(1,2) (1,3)…(1..n-1) (1,n)
(2,3)…(2..n-1) (2,n)
…
(n-1,n)
Через Pascal
Ответы
Ответ дал:
1
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.
lanakot2001:
Спасибо, Вы очень помогли
Похожие вопросы
1 год назад
2 года назад
2 года назад
7 лет назад
9 лет назад