Трое друзей отправились на велопрогулку. когда велодорожка проходила вдоль шоссе, мимо них на большой скорости пронеслась машина. -— ого, зеленый вольво! — сказал антон — да нет, это же был зеленый рено, — возразил ему коля. — не спорьте, это был синий мерседес, — сказал илья. когда чуть позже они увидели эту машину на обочине (водитель менял колесо), то поняли, что каждый из них верно назвал либо цвет либо марку автомобиля. какой автомобиль видели друзья? зеленый мерседес зеленый рено синий рено синий мерседес синий вольво зеленый вольво

Программа, которая использует два массива

var 
c, a: array[1..20] of integer; 
i: integer;
begin 
write('Первый массив '); 
for i := 1 to 20 do   begin   
c[i] := i * (-5);   
write(c[i], ' '); 
end; 
writeln; 
write('Преобразованный массив '); 
for i := 1 to 20 do   begin   
a[i] := c[20 - i + 1];   
write(a[i], ' '); 
end;  
end.

ИЛИ  Программа не использующая два массива, а просто переворачивающая первый

var 
c: array[1..20] of integer; 
i: integer;
begin  write('Первый массив '); 
for i := 1 to 20 do   begin   
c[i] := i * (-5);   
write(c[i], ' '); 
end; 
writeln; 
write('Преобразованный массив '); 
for i := 20 downto 1 do  write(c[i], ' '); 
end.

Обе программы работают!

Что случится. Ты соответственно не сможешь пользоваться для чего он и предназначен. Но как правильно это возникает в случае нескольких причин. Первая самая распространённая, BIOS не обнаружила жёсткий диск. Вторая это возможно вы повредили каким-то образом жёсткий диск. Ну и я думаю еще какие-то сторонние программы, которые мешают загрузки Винды решения. Ну мои версии это: Тест жёсткого диска. Переустановка ОСи.При включении компа через клавишу на компьютере выйти в список инструментов F8 и попробовать "последние работо параметры". А так, переустановка Windows, всегда рабочий вариант, если не хотите париться. У меня Win8 и я делаю все через инструменты F8.