Формулы указаны в первой строке. Поэтому только голые цифры.
8 --- 8 = 2^i --- i = 3 --- 200 --- 600
16 --- 16 = 2^i --- i = 4 --- 110 --- 440
64 --- 64 = 2^i --- i = 6 --- 120 --- 600
128 --- 128 = 2^i --- i = 7 --- 100 --- 700
256 --- 256 = 2^i --- i = 8 --- 80 --- 160
Размерности писать не нужно
1 клумба=76
2 клумба=44
3 клумба=16
4 клумба=46
76+44+16+46=182 (м)- провода нуж но.
Ответ:182
Program Z1;
uses CRT;
var a, b, c, s: integer;
begin
read(a, b, c);
s:=a+b+c;
writeln(s);
end.
Var a,b,c,sa: real;
begin
writeln ('Введите 3 числа:');
readln (a,b,c);
sa:=(a+b+c)/3;
writeln;
writeln ('Среднее арифметическое = ',sa)
end.
-----------------
Введите 3 числа:
28.48 53.11 674.1
Среднее арифметическое = 251.896666666667
n:=5;
x:=0;
for i:=1 to n do
x:=i;
После выполнения цикла значение x будет равно 5
Label1.Caption:=IntToStr(x);
На экран будет выведено 5