В начале года 1 кг картофеля 1л молока 1 десяток яиц стоил по а рублей ежемесечно но цена картофеля увеличивается на 30% цена молока на 40% цена яиц в 2 раза проследите ежемесечное изменение цены продуктов как измениться цена продуктов к концу года чтотбудет дорогим и самым дешёвым ​

буфер обмена,перетаскивание,сохранение в файл

program ssd;

  uses crt,graph;

  var       d,m: integer;

  begin

  clrscr;

  initgraph(d,m,'');

  arc(200,200,360,180,50);

  line(150,200,250,200);

  readkey; closegraph;

  end.

7 - диск, винт, сиди

9 пробел

10 импорт

11 окно

12ввод

15 стэк ?

16граф

18свич

20тэг

varn,i: integer; x0,y0,x1,y1,x2,y2,s: real; begin readln(n); s: =0; readln(x0,y0); x1: =x0; y1: =y0; for i: =2 to n do begin readln(x2,y2); s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); x1: =x2; y1: =y2; end; x2: =x0; y2: =y0; s: =s+sqrt((x1-x2)*(x1-x2)+(y1-y2)*(y1-y2)); writeln(s: 10: 2); end.