Программа не доработана,не будет запускаться,очень много ошибок
Я думаю, что не существует. Звезды называются людьми для удобства. И хоть звезд во вселенной миллиарды, но людьми наблюдается не очень много звезд.
Если звезды называются для удобства человека, то наличие двух звезд с одним и тем же именем может вызвать путаницу.
Картинка должна быть в папке с программой и быть в формате BMP
uses
graphabc;
var
n: string;
b: Picture;
s:integer;
begin
writeln('введите расстояние до зеркала');
readln(s);
write('Введите имя файла рисунка: ');
readln(n);
window.Clear;
b := Picture.Create(n);
b.Load(n);
b.Draw(50, 50);
b.FlipHorizontal;
b.Draw(50+2*s,50);
end.
N=64 нужно найти i, по формуле N=2 в степени i, подставляем, 64=2 в степени i, отсюда следут что i=6 битам
Выделить и растянуть область,которую вы хотите масштабировать(если вы об этом)