Предмет: Информатика,
автор: alinal1995
составить программу строит изображения предмета в плоском зеркале(расстояние от предмета до зеркала вводится с клавиатуры
Ответы
Автор ответа:
0
Картинка длжна быть в папке с программой и быть в формате 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.
Похожие вопросы
Предмет: Қазақ тiлi,
автор: aandujsekes
Предмет: Алгебра,
автор: muhanzanovroman
Предмет: Другие предметы,
автор: Аноним
Предмет: Геометрия,
автор: Aika90210
Предмет: Алгебра,
автор: yaroslava120498