- 09.01.2018 00:42
- Информатика
- remove_red_eye 16386
- thumb_up 46
Ответы и объяснения 1
var a, b: array [1..9] of integer; i: integer;
begin for i := 1 to 9 do read(a[i]); b[3] := a[1]; b[6] := a[2]; b[9] := a[3]; b[2] := a[4]; b[5] := a[5]; b[8] := a[6]; b[1] := a[7]; b[4] := a[8]; b[7] := a[9]; writeln(b[1], b[2], b[3]); writeln(b[4], b[5], b[6]); writeln(b[7], b[8], b[9]);end.
- 09.01.2018 10:49
- thumb_up 23
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.