Дано изображение. Выбери тип системы счисления.

ответ: унарная система счисления

Объяснение:

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

var a,res: integer;

begin

writeln('введите число');

readln(a);

res: =sqr(a);

writeln('квадрат числа,'a', равен,'res',');

readln;

end.