Сеня прынёс у дрывотню 34 палены, а дзядуля — на 3 палены менш, чым Сеня. Тата прынёс столькі пален, колькі Сеня і дзядуля разам. Колькі пален прынёс у дрывотню тата?
Динамометр покажет величину внешней силы в случае равномерного движения бруска и горизонтального воздействия динамометра внешняя сила равна по модулю силе трения, поэтому можно сказать что динамометр показывает величину силы трения F+F тр = m*a=m*0 отсюда F=-F тр
USES Crt;
VAR
X: INTEGER; S, K, P: INTEGER; I: BYTE;
Begin
P:=1; S:=0; K:=0;
FOR I:=1 TO 10 DO Begin
WriteLn(‘Введите ‘,I,’ -е значение’); ReadLn(x);
IF X>0 Then P:=P*X; { произведение положительных }
IF X<0 Then Begin
S:=S+X; { сумма отрицательных }
K:=K+1; { количество отрицательных }
End;
End;
WriteLn(‘ Произведение положительных значений = ‘,p);
WriteLn(‘ Сумма отрицательных значений = ‘,s);
WriteLn(‘ Количество отрицательных значений = ‘,k);
END.
USES Crt;
VAR
X: INTEGER; S, K, P: INTEGER; I: BYTE;
Begin
P:=1; S:=0; K:=0;
FOR I:=1 TO 10 DO Begin
WriteLn(‘Введите ‘,I,’ -е значение’); ReadLn(x);
IF X>0 Then P:=P*X; { произведение положительных }
IF X<0 Then Begin
S:=S+X; { сумма отрицательных }
K:=K+1; { количество отрицательных }
End;
End;
WriteLn(‘ Произведение положительных значений = ‘,p);
WriteLn(‘ Сумма отрицательных значений = ‘,s);
WriteLn(‘ Количество отрицательных значений = ‘,k);
END.
в случае равномерного движения бруска и горизонтального воздействия динамометра внешняя сила равна по модулю силе трения, поэтому можно сказать что динамометр показывает величину силы трения
F+F тр = m*a=m*0
отсюда F=-F тр