1,Закономерность 1-го,2-го,3-го,4-го числа + 1= соответственно 2,3,4; к 5-тому +2(4+2=6) ; к 6-тому числу(6+3=9); к 7-тому (9+4=13); к 8-мому +6(13+6=19); к 9-тому +9 (19+9=28); соответственно+12 (28+12=40). 10-ое число 40, Далее начинается следующий ряд, который с этой же закономерностью составит соответственно числа 60,61,62,63,64,66,69,73,79,88,100, следующий закономерный ряд начнется с 120 и так далее.
Var
a:array[1..1000]of integer;
i,n,k,c,q:integer;
begin
readln(n);
for i:=1 to n do
begin
readln(a[i]);
if (a[i] mod 10 = 4) then
begin
k:=a[i];
c:=0;
while k>0 do
begin
c:=c + k mod 10;
k:= k div 10;
end;
if c mod 3 = 0 then
q:=q+1;
end;
end;
writeln(q);
end.
A=[]
sum=0
while True:
c=int(input())
if c==0:
break
a.append(c)
for d in a:
sum+=d
print(sum)
...
writeln(abs(power(10,5) +3));
...
int[,] A = new int[3,4]; //любое заполнение А
int[] evens = new int[3]; //массив чётных чисел в каждой строке
for (int i = 0; i < 3; i++)
for (int j = 0; j < 4; j++)
if (A[i, j] % 2 == 0)
evens[i]++;