, очень .
Язык программирования c++

1

program xxx;

    var n : integer;

begin

    write('введите число n=');

    readln(n);

    if n mod 2 = 0 then write('четное') else write ('нечетное');

    realdn

end.

2

program xxx;

    var n : integer;

begin

    write('введите число n=');

    readln(n);

    e : = n mod 10

    if e = 7 then write('заканчивается на 7') else write ('не заканчивается на 7');

    realdn

end.

вроде бы 100*100=10000 бит=1250 байта

по углам комнаты расставить 4 стула и   около каждой стены по одному ( ещё 4 стула). всего 8 стульев : )

майор - артиллерист капитан - летчик лейтенант - связист старшина - минометчик сержант - сапер ефрейтор - танкист