Var a:array[1..3,1..3] of integer;
i,j,s:integer;
begin
for i:=1 to 3 do
for j:=1 to 3 do begin
read(a[i,j]);
if not odd(a[i,j]) then s+=a[i,j];
end;
writeln(s);
<span>end.</span>
Import java.util.*;
import java.io.*;
import java.lang.*;
class Program {
public static void main(String[] args) {
Scanner Scan = new Scanner(System.in);
Random rand = new Random();
int A = rand.nextInt(151)+5;
if ((25 < A)&&(A < 100)) System.out.printf("%d ∈ (25,100)",A);
else System.out.printf("%d ∉ (25,100)",A);
}
}
12>10,но 12<12 неверно, значит
n:=12-1
что равно 11
Решено, исходные данные:
<em>a(1)=0 a(2)=1</em>
<em>a(n+2)=a(n+1)</em><span><em>-a(n)</em>
<em>Найди a(885)</em>
<em>Внимание: скобка означает число в нижнем индексе.</em>
Решаем, исходим сразу от наибольшего числа:
</span><em>a(885)=a(884)-a(883)=a(883)-a(882)-a(883)=a(882)
</em>В чем фокус-покус. Сначала мы применили формулу по отношению к числу<em>a(885)</em><span>, а потом к числу </span><em>a(884)</em><span>, из чего получилось равенство </span><em>a(885)=a(882)</em>
Тем самым, мы можем утверждать, что числа в последовательностях будут совпадать каждые 885-882=3 раза. 885 кратно 3, следовательно ищем наименьшее общее кратное число, оно равно 3. Следовательно a(885)=a(3)
<span>Находим </span><em>a(3)</em><span> из формулы:</span><em> a(3)=a(2)-a(1)=1-0=1</em><span>, следовательно </span>a(885)=1
Во-первых, не на программе паскаль, а на языке. Это язык программирования.
begin
var a:array [1..5,1..3] of integer;var i:integer; var j:integer;var sum:integer;var count:integer;count:=0; sum:=0;for i:=1 to 5 do for j:=1 to 3 do a[i,j]:=random(2*20+1); for i:=1 to 5 dobegin for j:=1 to 3 do write( a[i,j]+' '); writeln;end;
for i:=1 to 5 do for j:=1 to 3 do if(((i+j) mod 2) = 0) then begin count:=count+1; sum:=sum+a[i,j]; end;writeln('Среднее арифметическое: '+ sum/count);end.
Массив заполняется рандомно