Помощь - Поиск - Пользователи - Календарь
Полная версия: Задача на двумерный массив
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
Yara24
Помогите решить задачу
Дано: varA:array[1..10,1..10] of integer;
Заполнить массив А следующим образом:
1 2 ...10
11 12...20
21 22...30
................
................
91 92..100

Заранее спасибо...
TarasBer
for j := 1 to 10 do for i := 1 to 10 do A[j, i] := (j-1)*10 + i;


Ну или
k := 1;
for j := 1 to 10 do for i := 1 to 10 do begin
A[j, i] :=k;
inc(k);
end;
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.