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

Ответы 1

  • Картинка должна быть в папке с программой и быть в формате BMP

    usesgraphabc;

    varn: string;b: Picture;s:integer;

    beginwriteln('введите расстояние до зеркала');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.

  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years