• Помогите пожалуйста решить в Паскале.
    Заполнить произвольный массив размером N x N (N<10) по следующему правилу:
    12345
    54321
    12345
    54321
    12345

Ответы 1

  • const  nn=10;var  i,j,n:integer;begin  Write('Введите число строк в массиве (2..9): ');  Read(n);  if (n<2) or (n>9) then writeln('Неверное значение')  else    for i:=1 to n do    begin      if (i mod 2)<>0 then for j:=1 to n do Write(j)      else for j:=n downto 1 do Write(j);      Writeln    endend.Тестовое решение:Введите число строк в массиве (2..9): 51234554321123455432112345
    • Автор:

      jazmyn
    • 5 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years