Напишите программу, которая вычисляет сумму n-первых целых положительных чисел
S = 1 + 2 + 3 + ... + n
Количество суммируемых чисел n должно вводиться пользователем во время работы программы

Есть относительные ссылки, когда столбцы и строки меняются в зависимости от ячейки: A1 (A4+A2) --> B1 (B4+B2); C2 (B3+A1) --> C5(B6+A4); A2(B4) --> B4(C6).

А есть абсолютные ссылки, когда столбец строка или вся ячейка не изменяются, в зависимости от того где стоит знак $. A1($A3) --> C4 ($A6); A2 (B$3) --> B4 (C$3); A1 ($B$6) --> F20 ($B$6).

Теперь просто ответы:

B) =C6+D$1B)= C1*$B2C) = $A1*D2C)=В5*С$2C)= $C2+F3c. B$5a. $B52. 5+2 это просто текст, текст и будет в ячейкеc) 5*(A2+C3)/(3*(2*B2-3*D3)) арифметические знак ставить надо, а у знака : другое обозначение. d) =A2*A3-A4a) не изменяютсяd) преобразуются в зависимости от нового положения формулы. c) =$A$1*A3+B3d) 30 т.к. 20+20/2 = 30b) 140 т.к. мы посчитали сумму от ячейки A1 до ячейки A7 включая концы, а затем поделили на 2.

Uses GraphABC;
var y, i, x, j, x1, y1: integer;
begin
moveto(0,320);
lineto(2000,320);
Line(120,100,80,140);
Line(120,100,160,140);
Line(120,160,80,200);
Line(120,160,160,200);
Line(120,220,80,260);
Line(120,220,160,260);
Line(120,100,120,320);

Rectangle(260,180,400,320);
Line(260,180,340,100);
line(340,100,400,180);
Rectangle(300,220,340,260);
Line(300,240,340,240);
line(320,220,320,260);
Rectangle(300,280,340,320);

for i := 1 to 10 do begin
x := random (1024);
y := random (200);

for j:=1 to 3 do
begin
x1:=random(800);
y1:=random(100);
line(x1,y1,x1+40,y1+40);
line(x1,y1+20,x1+40,y1+20);
line(x1+40,y1,x1,y1+40);
Line(x1+20,y1,x1+20,y1+40);
end;

Rectangle(460,200,500,320);
Line(460,220,500,220);
Line(460,240,500,240);
Line(460,260,500,260);
Line(460,280,500,280);
Line(460,300,500,300);
Line(500,200,560,200);
line(560,200,640,320);
line(500,320,640,320);

Circle(760,280,40);
Circle(760,220,20);
Circle(760,190,10);

Line(500,120,540,120);
line(600,20,600,60);
Line(600,180,600,220);
Line(660,120,700,120);
Circle(600,120,40);

FloodFill(140,440,clSkyBlue);
FloodFill(160,380,clSkyBlue);
FloodFill(160,350,clSkyBlue);
FloodFill(320,200,clGray);
FloodFill(310,230,clYellow);
FloodFill(330,230,clYellow);
FloodFill(310,250,clYellow);
FloodFill(330,250,clYellow);
FloodFill(302,20,clSilver);
FloodFill(600,140,clYellow);
FloodFill(320,300,clBrown);
FloodFill(320,160,clRed);
FloodFill(540,250,clTeal);
FloodFill(480,210,clMaroon);
FloodFill(480,230,clMaroon);
FloodFill(480,250,clMaroon);
FloodFill(480,270,clMaroon);
FloodFill(480,290,clMaroon);
FloodFill(480,310,clMaroon);

end;
end.