Я думаю, что в будущем компьютеры станут безвредными для людей и окружающей среды. Их вид усовершенствуется до человеческого. Они будут расти вместе с хозяином (хозяйкой), хотя и смогут трансформироваться (от 1 см до бесконечности в длину и в толщину, а также в обычный компьютер или ноутбук). Причем, если вы идЈте поздно вечером домой, и боитесь бандитов, можно будет задать программу модифицирования, например в собаку. Или, допустим, Вы не считаете удобным ходить в школу с другом-компьютером, и тогда Вы сможете превратить его в какой-либо предмет или животное. У него будут такие же интересы, как и у их владельца, с ним можно будет свободно разговаривать, ходить куда-нибудь, и т. д. Это будет не человек и не робот, это будет компьютер. Питаться он будет не человеческой едой, не электричеством, а солнечным зарядом, причЈм, если кончится энергия, он сможет на автоматике завершить заданную ему задачу.
Я думаю, что в будущем компьютеры станут безвредными для людей и окружающей среды. Их вид усовершенствуется до человеческого. Они будут расти вместе с хозяином (хозяйкой), хотя и смогут трансформироваться (от 1 см до бесконечности в длину и в толщину, а также в обычный компьютер или ноутбук). Причем, если вы идЈте поздно вечером домой, и боитесь бандитов, можно будет задать программу модифицирования, например в собаку. Или, допустим, Вы не считаете удобным ходить в школу с другом-компьютером, и тогда Вы сможете превратить его в какой-либо предмет или животное. У него будут такие же интересы, как и у их владельца, с ним можно будет свободно разговаривать, ходить куда-нибудь, и т. д. Это будет не человек и не робот, это будет компьютер. Питаться он будет не человеческой едой, не электричеством, а солнечным зарядом, причЈм, если кончится энергия, он сможет на автоматике завершить заданную ему задачу.
Поделитесь своими знаниями, ответьте на вопрос:
Program mi; var n, ch, i, max: integer; begin max: =1; write('введите кол-во чисел в последовательности -> '); readln(n); writeln('введите последовательность: '); for i: =1 to n do begin write('-> '); readln(ch); if ch > max then max: =ch; end; writeln('максимальное число: ', max); end. нарисуйте блок