Объяснение:
1. БЕЗ ПРИЗНАКОВ ЖИЗНИ (нет изображения, звуковых сигналов, не включаются светодиоды на системной плате и вентилятор ЦП)
2. ПК РАБОТАЕТ, НЕТ ИЗОБРАЖЕНИЯ (вентилятор ЦП работает, светодиоды материнской платы горят, но видеосигнала на мониторе нет)
3. BIOS ПРЕКРАЩАЕТ РАБОТУ (компьютер работает, но BIOS внезапно прекращает свою работу с ошибкой)
4. НЕ УДАЕТСЯ ЗАГРУЗИТЬ WINDOWS (появляется логотип ОС, но пользовательский интерфейс не загружается)
5. ПК РАБОТАЕТ СО СБОЯМИ (компьютер загружается, но «зависает» через некоторое время или под нагрузкой)
6. НЕ РАБОТАЮТ КОМПОНЕНТЫ ПК (проблемы с изображением или звуком, а также с портом USB и модулем Wi-Fi или приводом CD, DVD)
var
a:array[1..5] of real; {можно взять и тип integer}
i:integer;
Begin
for i:=1 to 5 do
begin
writeln('Введите элемент массива');
readln(a[i]);
end;
for i:=1 to 5 do
if a[i]>10 then write(a[i],' ');
writeln;
End.