Var i,k, max, N: integer;
a: array[1..300000] of integer;
Begin
read(N);
for i:=1 to N do
read(a[i]);
max := a[1];
for i := 2 to N do
if a[i]>max then begin
max:= a[i];
end;
write(max);
End.
Конкретно вопрос не сформулирован. Но если предположить что вопрос в том, что определить к какому типу памяти отнести внутреннюю человеческую, то можно провести следующие рассуждения.
Вопрос этот очень сложный и медики и ученые в полной мере ответить на него не смогут, но можно кое что сказать на основе своих собственных наблюдений.
Во первых, в человеческой голове есть память, которую можно условно назвать "оперативная", то есть такая память, которая содержит информацию о текущих событиях, в течение дня, за тем когда проходит сон "перезагрузка", часть информации стирается, часть передается в другую часть мозга - "постоянную память". При чем в постоянной памяти постепенно тоже происходит обновление информации, когда информация актуальная постоянно обновляется, а та информация, которая много времени не используется стирается.
Сон тоже невозможно назвать однозначно "перезагрузкой", сон - процесс намного более сложный. Во время сна происходит не просто передача и стирание информации, а происходит сложная обработка, в том числе анализ данных, полученных за день и выполнение выводов, которые человек не способен получить сознательно.
"утро вечера мудренее" это как раз именно об этом.
Напишу на паскале
Решается проверкой трех условий
# Так сойдёт?
from math import sqrt
print('Введите коэффициенты a, b, c для ax^2 + bx + c = 0 в виде "a b c", где коэффициент а не равен 0')
a, b, c = list(map(int, input().split())) # здесь поменяй способ ввода квадратного уравнения, если другой нужен
D = b ** 2 - 4 * a * c # дискриминант
if D < 0:
print("Нет решений")
elif D == 0:
x = (-1 * b + sqrt(D)) / (2 * a)
print("Уравнение имеет одно решение:", x)
else:
x1 = (-1 * b + sqrt(D)) / (2 * a)
x2 = (-1 * b - sqrt(D)) / (2 * a)
print("Уравнение имеет два решения:", x1, "и", x2)
