составить программу которая строит изображения предмета в плоском зеркале(расстояние от

Составить программу которая строит изображения предмета в плоском зеркале(расстояние от предмета до зеркала регулируется стрелками на клавиатуре)

Задать свой вопрос
1 ответ

Картина должна быть в папке с программкой и быть в формате 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.

Арсений
я написал же чтобы регулировалось не вводом с клавиатуры а стрелками
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт