в программе паскаль составить ​

jrjkj rjkf_rjkjrjkf b yf rjkf[_rjkjrjkf

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

на паскале:

program ostatok; var c: integer; beginwriteln('введите число с.'); readln(c); writeln('остаток от деления ',c,' на 10, возведенный в квадрат, равен ',sqr(c mod 10)); end.

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