Вчому відміності у створенні об'єктів файлової системи - ярлика і файлу ?

1)  ярлык является лишь ссылкой на файл и хранит только его  адрес, при удалении ярлыка, файл удален не будет.2) при создании файла в памяти компьютера выделяется место под этот файл и присваивает ему уникальный адрес. при удалении файла данные будут утеряны.нажмите "" если

Вне сказано, откуда берутся исходные данные, поэтому будем вводить их с клавиатуры. сначала ведем общее количество данных (не факт, что данные за месяц снимались строго ежедневно), а затем сами данные. это позволит заодно осуществить контроль ввода. var   n,s,t,i: integer; begin   write('укажите количество данных: ');   read(n);   writeln('теперь вводите данные');   s: =0;   for i: =1 to n do       begin       read(t);       s: =s+t       end;   writeln('средняя температура за месяц составила ',s/n: 0: 1) end. пример решения укажите количество данных: 11 теперь вводите данные 27 29 26 31 24 23 27 30 31 28 25 средняя температура за месяц составила 27.4

Данная программа выполнена для pascalabc.net, немного кривая, но полностью рабочая.  uses graphabc; var i: integer; procedure boy(z,w: integer); begin rectangle(z-20,w-30,z+20,w+40); moveto(z-20,w-20); lineto(z-35,w+15); lineto(z-20,w); lineto(z-20,w-20); floodfill(z-25,w,clbrown); moveto(z+20,w-20); lineto(z+35,w+15); lineto(z+20,w); lineto(z+20,w-20); floodfill(z+25,w,clbrown); floodfill(z,w,clblue); moveto(z-10,w+40); lineto(z-10,w+70); lineto(z-3,w+70); lineto(z-3,w+40); lineto(z+3,w+40); lineto(z+3,w+70); lineto(z+10,w+70); lineto(z+10,w+40); lineto(z-10,w+40); floodfill(z-5,w+65,clbrown); floodfill(z+5,w+65,clbrown); circle(z,w-40,20); floodfill(z,w-40,clbrown); end; procedure ball(x,y: integer); begin circle(x,y,15); floodfill(x,y,clred); end; begin lockdrawing; for i: =1 to 20 do begin boy(100,200); ball(100+i*5,200-i*5); ellipse(200,115,250,140); redraw; clearwindow(clwhite); end; for i: =1 to 5 do begin boy(100,200); ball(200+i*5,100+i*5); ellipse(200,115,250,140); redraw; clearwindow(clwhite); end; for i: =1 to 25 do begin boy(100,200); ball(225,125+i*5); ellipse(200,115,250,140); redraw; clearwindow(clwhite); end; end.