HOME FORUMS MEMBERS RECENT POSTS LOG IN  
× Авторизация
Имя пользователя:
Пароль:
Нет аккаунта? Регистрация
Баннер 1   Баннер 2
НОВЫЕ ТОРГОВАЯ НОВОСТИ ЧАТ
loading...
Скрыть
Вернуться   ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
   
 
 
Опции темы Поиск в этой теме Опции просмотра

  #10  
Старый 11.03.2009, 02:41
cremator (c)
Постоянный
Регистрация: 20.06.2008
Сообщений: 323
С нами: 9416345

Репутация: 165
По умолчанию

Цитата:
Сообщение от lll6  
Помогите заполнить массив в таком вот порядке
Код:
1  3  4   10
2  5  9   11
6  8  12  15
7  13 14  16
То есть по диагонали заполняется. Размеры массива могут быть любыми, массив квадратный.
Код:
  
program Project2;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var MyArray:array [1..4,1..4] of integer; i,j,x:integer;
begin
for i:=1 to 4 do
for j:=1 to 4 do
begin
readln(x);
MyArray[i,j]:=x;
end;
end.
Я так понял?//

PS не знал что в 1м классе уже паскаль проходят/// х(
 
Ответить с цитированием
 



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ! Alexsize Беспроводные технологии/Wi-Fi/Wardriving 2569 10.05.2026 13:27
[jQuery] - Задай вопрос, получи ответ Isis PHP 62 25.12.2009 03:25



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT ™ © 2001- Antichat Kft.