Program n1; var i: integer; begin for i: =100 to 1000 do if i mod 11=0 then writeln(i); end.
Спасибо
Ответ дал: Гость
теперь не плагиат
program pr; var c: integer; beginwriteln('введите число с'); readln(c); writeln('остаток от целочисленного деления числа ',c,' на 10 в квадрате равен ',sqr(c mod 10)); end.
Ответ дал: Гость
2 единицы т.к 1025=10000000001 в двоичной системе счисления
Популярные вопросы