Найти двузначное число, равное утроенному произведению его цифр. ответ: 15,24.

Var i,j: integer; begin for i: =1 to 9 do   for j: =0 to 9 do   if i*10+j = 3*i*j then writeln(i*10+j); end. результат: 15 24

Если надо программу для поиска такого числа, то как вариант: //pascal var i: integer; begin   for i: =10 to 99 do       if (i=(i div 10 * i mod 10) *3) then writeln(i); end. ответ: 1524

20с7f = 2* 16^4 + 0 * 16^3 +12 * 16 ^2 + 7 * 16^1 + 15 * 16^0=

= 2 * 65536 + 0 + 12 * 256 + 7 * 16 + 15 = 131072 + 3072 + 112 + 15 = 134271(10)

 

f3ao6/4 - если я правильно понял это условие, то перевести в 10 систему и разделить на 4?

 

f3ao6 = 15 * 16^4 + 3 * 16^3 + 10 * 16^2 + 0 * 16^1 + 6 * 16^0 =

= 15 * 65536 + 3 * 4096 + 10 * 256 + 0 + 6 = 983040 + 12288 + 2560 + 6 = 997894(10)

997894 : 4 = 249473,5 (10)

 

теперь не плагиат

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