составить программу в Pascal ABC…

Question

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

Answer 1

85

kaban117

07 апреля 2023

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

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: