Цикл вида for i:=a to b выполняется b-a+1раз.
В данном случае 4-0+1=5.
<u>Ответ:</u> 5 раз.
Путь А , B , F = 7 . От пути А , С , дорога в F не ведет .
Путь от А , F=9. Следовательно кратчайший путь от A в F = 7
Ответ ; 2
Var
max,min,i:integer;
b:real;
a:array[1..9]of integer;
begin
for i:=1 to 9 do
begin
while (a[i]<1) or (a[i]>6) do
begin
write(i,' оценка: ');
readln(a[i]);
end;
if i=1 then
begin
max:=a[1];
min:=a[1];
end;
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
b:=b+a[i];
end;
b:=(b-min-max)/7;
writeln('Зачетная оценка: ',b);
<span>end. </span>
1) в 6СС-3441
2)в 7 СС -2625
3) в 5 СС
в 4) надо перевести все в 10СС и отметить точки на осях