Способы связи
- 
- 
- Оказываем услуги
Главные менеджеры
Менеджер Елена Картиза - помогает в оформлении заказов на сайте. Ей можно задать любые интересующие вас вопросы.
Менеджер Галина Евсютина - специалист отдела качества. Проверяет выполненные работы на соответствие всем требованиям.
Менеджер Анастасия Ветрицина - подберет специалиста, который займется выполнением вашего задания.
Справочник студента
Проконсультируем прямо сейчас
Мы онлайн в наших сообществах. ПН - ВС 08:00-22:00
Введите с клавиатуры одномерный числовой массив из 9 элементов. Сверните его в матрицу размером 3x3, разместив первую тройку
От нашего клиента с логином YmeOLcs на электронную почту пришел вопрос: "Введите с клавиатуры одномерный числовой массив из 9 элементов. Сверните его в матрицу размером 3x3, разместив первую тройку" это здание мы отнесли к разделу ЕГЭ (школьный). Так как клиент является зарегистрированным пользователем нашего сайта, то мы бесплатно предоставим ответ.
ЕГЭ (школьный) - довольно сложный раздел, здесь действительно попадаются вопросы, которые даже у специалиста с законченным высшим образованием поставят в тупик при подготовке правильного ответа. Но мы известны тем, что сложности нас не останавливают, а наоборот развивают и расширяют наши знания.
Вы спрашивали Введите с клавиатуры одномерный числовой массив из 9 элементов. Сверните его в матрицу размером 3x3, разместив первую тройку? - отвечаем:
Var A:array[1..3,1..3] of integer; B:array[1..9] of integer;
i,j,k:integer;
Begin
ClrScr; j:=1; k:=1;
For i:=1 to 9 do Readln(B[i]);
For i:=1 to 9 do
Begin
A[j,k]:=B[i]; inc(k);
If k=4 then
Begin
inc(j); k:=1;
End;
End;
For i:=1 to 3 do
Begin
For j:=1 to 3 do Write(A[i,j]:4);
Writeln;
End;
Readln;
End.
