Если перевести 14 байт в биты то будет 112 бита
private static void PrintSomeNumbers(int start_number, int count, int step)
{
Debug.Assert(count > 0);
for (var i = 0; i < count; i++)
{
for (var j = 0; j <= i; j++)
Console.Write(start_number + i + " ");
Console.WriteLine();
for (var j = 0; j <= i; j++)
Console.Write(start_number + i + step + " ");
Console.WriteLine();
}
}
полный код в приложении
В пустых картачках 11 и 10
2 ,5,4,6,5,7,6,8,7,9,8
Var a,b,c,d,e:integer;
begin
for a:=100 to 500 do begin
b:=a mod 2; c:=a div 10 mod 10; d:=a div 100;
e:=b+c;
if e=15 then writeln(a);
end;
end.
var
a, p, s : integer;
begin
write('введите сторону квадрата a=');
readln(a);
p := a*4;
s := a*a;
writeln('периметр P=', p);
writeln('площадь S=', s);
end.