Просто кликаем правой кнопкой мыши на файл потом выбираем там свойство и вауля)
За 1 взвешивание делим 2017монет на 2 и что легче или тяжелее другово
Var c:integer; Begin c:=c mod 5; Writeln(c*c); End.
К =640*350
N=512
I-?
Решение :
N=2^i=2^9
I=K*i=512*9=4608 бит
Чтобы перевести в байты нам нужно 4608:8=576
Чтобы перевести в Кбайты нам нужно 576/1024=0,56 Кбайт
ну как то так......
Желаю удачи!