Программирование язык паскаль вывести квадрат, состоящий из nxn ячеек, заполненный числами от 1 до n "дорожками" с клавиатуры задается число n не превышающее 20. пример: 123 231 312

VeZun4ik VeZun4ik    1   09.09.2019 07:00    0

Ответы
София240905 София240905  20.08.2020 23:52
var n,i,j:integer;
begin
readln(n);
for i:=1 to n do
 begin
  for j:=i to n do write(j);
  for j:=1 to i-1 do write(j);
  writeln;
 end;
end.

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

Популярные вопросы