var m:array[1..100000] of integer;
a,b,sum,sum2,n,k,i:integer;
begin
sum:=0;
k:=0;
sum2:=0;
readln(a,b,n);
randomize;
for i:=1 to n do begin m[i]:=random(a,b); if(m[i]<50) then begin sum:=sum+m[i]; k:=k+1; end;
if(m[i]>=50) then sum2:=sum2+m[i]; end;
for i:=1 to n do write(m[i],' ');
writeln;
writeln((sum/k):5:3,' ',(sum2/(n-k):5:3));
end.
Var A:integer;
Begin
WriteLn('Введи возраст человека');
ReadLn(A);
if (A>6)and(A<17) then Write('Является школьником')
else WriteLn('Не является школьником')
End.
a = int(input())
b = int(input())
c = int(input())
s = a + pow(a + b **3, 0.5) / c
k = (s ** 4) - (pow(abs(a * b * c),0.5))
y = a * s + (pow(k,0.5)) + (s / (b * c))
print(y)
Ответ 1 , здесь не указан вес товара .
а что означает нижний ряд цифр , у вас не понятно.
Данное свойство алгоритма называется дискретность.