program open_s;
var
y,a,b,c:real;
begin
writeln('Введи значение a');
readln(a);
writeln('Введи значение b');
readln(b);
writeln('Введи значение c');
readln(c);
y:=sqrt(a-c)-((sqr(b)+2)/c);
write('Ответ: ',y);
end.
Немного непонятно, как 8 может указывать на то, что дальше будет 6 чисел.
python 3:
with open("input.txt") as f:
numbers = list(map(int, f.read().split()))[1:]
print(sum(numbers)/len(numbers))
PascalABC.NET 3.2:
begin
var f := openread('input.txt');
var n := readinteger(f);
var sum := 0;
for var i := 1 to n do
sum += readinteger(f);
write(sum / n);
end.
Var a:array[1..100] of integer;
I,c,n:integer;
Begin
Readln(n);
For i:=1 to n do
Begin
Read(a[i]);
Write(a[i],' ');
If a[i]<0
Then c:=c+1;
End;
Writeln('кол-во отриц.=',c);
End.
1.
а) a*x*x+b*x+c
б) v+a*t*t/2
в) 1/2*(a+b)*h
г) (1+x1*x2)/(b*b*c)
д) SQRT(a*a+b*b)
2. Операции * и / выполняются слева направо, поэтому (см. рис.):
1) = b*(a*d)/(e*c)
2) = (a*b)/(c*d*e)
3) = a*b*d/(c*e)
4) = (a*d*b)/(c*e)
"Лишнее" выражение - 2)