1) ты не можешь копировать/распространять что-либо без согласия автора
2)
Использование его музыки/фильма и т.д в личных целях
3)
Поагиат-копирование материла (сделал он отправил я)
Var a:array[1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do begin
a[i]:=random(26);
writeln(a[i]);
if a[i] > 12 then k := k + 1;
end;
writeln('Элементов массива превышающих 12: ',k);
end.
Var n,i: integer;
begin
readln(n);
for i:=1 to 9 do
writeln(n,'*',i,'=',n*i);
end.
Первое встречающееся число это 5(10) или 11(4). Затем числа, оканчивающиеся на 11(4) встречаются через 100(4) или 16(10). Поэтому числа будут такие: 5, 5+16=21, 5+32=37, 5+48=53...
5, 21, 37, 53, 69, 85, 101. Следующее будет уже 117.