Aalternative method known as a penis extender such as those made by fast size or quick extender pro. the penis extender device was developed by medical professionals and was designed to be worn daily. through the act of constant force (controlled traction) promote cellular growth thus creating new penis tissue. i won't be going into the details as proven results can be throughout medical journals and online. the penis extender brings a level of convenience which far surpasses the time consuming jelqing technique. the extender system gives the user the freedom get great results during the day and night. you can wear the device at work, during errands or even leisure time. a newer device such as the quick extender pro takes comfort to the next level by including a secondary comfort pad to distribute strain and tension so the device can be worn for several more hours than existing brands. many people have reported through community online forums that newer system like the quick extender pro have become much more comfortable due to its dual comfort strap system. systems like these offer a greater range of flexibility, convenience and comfort targeted towards men with busy lives and even busier schedules.
begin
var a:=MatrixRandom(7,7,0,9);
var k:=0;
for var i:=0 to 6 do begin
for var j:=0 to 6 do begin
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.
Тестовое решение:
2 1 7 3 3 2 7
9 2 9 2 0 5 5
4 2 6 9 4 6 0
1 0 3 5 4 5 9
6 3 6 0 2 0 8
0 8 4 3 2 1 8
6 0 4 4 5 4 0
Кол-во элементов на [1,5]: 27
Вариант "совсем для школы"
const
n=7;
var
a:array[1..n,1..n] of integer;
i,j,k:integer;
begin
Randomize;
k:=0;
for i:=1 to n do begin
for j:=1 to n do begin
a[i,j]:=Random(10);
Write(a[i,j]:3);
if a[i,j] in [1..5] then Inc(k)
end;
Writeln
end;
Writeln('Кол-во элементов на [1,5]: ',k)
end.