Есть ответ 👍

Web-параққа кестелер қандай мақсатпен қосылады?

229
483
Посмотреть ответы 1

Ответы на вопрос:


Program mas; var       mas, p_mas: array[1..15] of integer;       i: integer; begin randomize; for i: = 1 to 15 do   begin       mas[i] : = random(6) + 7;       p_mas[i] : = mas[i];   end; mas[8] : = mas[10] + 5; mas[10] : = mas[13]; writeln('первоначальный массив: '); for i : = 1 to 15 do   write(p_mas[i], ' '); writeln(crlf + 'изменённый массив: '); for i : = 1 to 15 do   write(mas[i], ' '); end.

Популярно: Информатика