Строка вводится с клавиатуры(максимум 99 символов). Первое слово должно быть с маленькой буквы или первая и последняя буквы этого слова не должны совпадать(иначе такое слово как Test не засчитается). Также будет засчитываться одна буква(abc d efg, буква d подходит, так как она и первая и последняя)
#include <iostream>
using std::cout;
using std::cin;
using std::endl;
#include <cstring>
using std::strtok;
using std::strlen;
int main()
{
char a[100], *ptr;
cout << "Enter the string:" << endl;
cin.getline(a, 100);
cout << endl;
ptr = strtok(a, "., ");
while(ptr)
{
if(*ptr == *(ptr + strlen(ptr) - 1))
{
cout << ptr << ' ';
}
ptr = strtok(NULL, "., ");
}
cout << endl;
return 0;
}
t = 2pi*sqrt(l/g)
в среде это g будет, естественно, меньше, так как на шарик действует выталкивающая сила.
найдём это g.
по 2 закону ньютона f = p-fa = pш*v*g0 - рс*v*g0=v*g0*(pш-рс)=m*g = pш*v*g
откуда g = g0*(1-pc/pш)
я использовал обозначения
g0 - стандартное ускорение свободного падения
рш - плотность шарика
рс - плотность среды
v - объём шарика.
то, что я написал, это просто закон архимеда, не более того. а закон ньютона - как скобки.
подставим в исходную формулу, получим
t = 2pi*sqrt(l/g0*(1-pc/pш))
подставим исходные данные
t = 2*pi*sqrt(0.1/g0*(1-1/1.2)) =2*pi*sqrt(6/(10*g0))=2*pi*sqrt(3/(5*g0)) = 2*3.14159*sqrt(3/(5*9.81)) = 1.556c = 1.56c
замечание1. в приближённых вычислениях часто принимают во внимание тот факт, что g = pi^2 c хорошей точностью. это значительно вычисления.
в нашем случае сразу получаем
t = 2*pi*sqrt(l/(g0*(1-1/1. = 2*sqrt(0.1*1.2/0.2) = 2*sqrt(0.6)=1.55 = 1.55c
то есть совпадение до сотых! а вычислять проще.
замечание2 это соотношение действительно только в системе си и его не сложно "доказать". нужно только вспомнить, что такое метр, когда его вводили при наполеоне.
вот вроде и всё.
хотя нет. попробуй исследовать полученную формулу. а что если плотность среды выше плотности шарика?
(подсказка - маятник перевернётся "вверх ногами").
ну и последнее. при таких плотностях среды(сравнимых с плотностью шарика) пренебрегать сопротивлением среды - рискованно, это сопротивление, как правило, большое и существенно влияет на поведение маятника.
begin
var n:=ReadInteger('n=');
var a:=MatrixRandom(n,n,10,99);
var s:=0;
var k:=0;
for var i:=0 to n-1 do begin
for var j:=0 to n-1 do Print(a[i,j]);
Writeln;
if a[i,i].IsEven then begin s+=a[i,i]; Inc(k) end;
end;
if k>0 then Writeln('S=',s/k:0:2)
else Writeln('На главной диагонали нет четных элементов')
end.
Тестовое решение
n= 8
63 13 33 90 25 21 87 91
88 88 48 13 30 59 81 27
73 23 76 77 52 19 33 97
53 87 13 74 17 35 61 70
77 96 51 61 82 33 63 22
39 88 84 54 88 73 74 69
76 26 69 14 45 80 70 54
80 36 47 38 18 22 84 62
S=75.33