В установке компьютер получает програмное обеспечение а в загрузке загружает его для дальнейшей работы
19 ходов. 7 дом, 3 дерево, 4 солнце, 3 фиксации, 2 вызова.
Program temp;
uses crt;
var
tem:array [8..20] of real;
min:real;
i:integer;
begin
for i:=8 to 20 do
begin
clrscr;
writeln('Vvedite temperaturu dlya ',i,' chasa zamera');
read(tem[i]);
end;
for i:=8 to 20 do if tem[i]<0 then min:=i;
writeln('Vpervue otricatelnaya temperatura otmechena v ',min);
readln;
end.