Какие сходства и различия между площадкой для бокса и площадкой для кегельринга​

program p_1; var i, n : integer; s : real; b : array [1..1000] of real; begin writeln('введите количество значений массива n'); readln(n); write('введите элементы массива а: '); for i: =1 to n do readln(a[i]);   writeln('введите элементы массива b'); for i: =1 to n do readln(b[i]); writeln('первоначальный массив b'); for i: =1 to n do writeln(b[i]); s: =0; for i: =1 to n do if a[i] mod 2 = 0 then s: =s+b[i]; writeln('сумма четных значений =', s); end.

s=v0*t+at^2\2

s=0*5+2*5^2\2=50\2=25м

предположим, что наш проводник абориген и говорит правду. тогда он сказал правду, что тот человек назвался аборигеном, но он мог быть как аборигеном так и пришельцем.

пусть наш проводник пришелец, который врет. тогда другой житель острова назвался пришельцем, а проводник сказал, что тот житель абориген. а этот случай не возможен, потому что если другой житель пришелец, он скажет что он абориген, а наш проводник обманет и должен был сказать, что тот пришелец, то же самое будет если другой житель острова абориген.

ответ: наш проводник абориген.

program dl9_relay;

var i,a,t ,r,n,s,s2,h,h2 : integet;  

begin

writeln ('vvedit # bileta');

readln (a);

t: =a div 100000;

r: =a mod 100000 mod 10000 mod 1000 mod 100 mod 10;   {барыжна строчка; )   }

n: =9; s: =0; s2: =0;

for i: =1 to n do begin        

h: =t mod i; if h=0 then s: =s+1;

h2: =r mod i;   if h2=0 then s2: =s2+1;

end;

if (h=2) and (h2=2) then writeln ('bilet shasliviy');

else writeln ('bilet obichniy tramvayniy=)');

readln

end.