сервис вопросов и ответовсоставить программу в Pascal ABC , которая строит изображение предмета в плоском зеркале (расстояние от предмета до зеркала вводится с клавиатуры)
10-11 класс|
|
DanielTN
18 окт. 2013 г., 0:33:50 (10 лет назад)
Ladymamamama1
18 окт. 2013 г., 2:31:57 (10 лет назад)
Картинка длжна быть в папке с программой и быть в формате 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.
Ответить
Другие вопросы из категории
Каким будет значение переменной y после выполнения следующего фрагмента программы?
x:='c';
case succ(x) of
Вводится последовательность целых чисел, по абсолютной величине меньших или равных 100.Найти и вывести на печать максимальный элемент и число
отрицательных элементов, расположенных после первого нулевого элемента.
Кто может плз очень срочно решить,желательно без массивов,но если не выйдет то через них.На языке Turbo Pascal
Задание № 1) Разработать блок схему алгоритма, который проверяет, является ли четным введенное с клавиатуры число
Задание 2) Разработать блок схему алгоритма? для вычисления и вывода на экран суммы 5 случайных числе в диапазоне 0..36.
Помогите пожалуйстааааа
Не знаю как решать, срочно, пожалуйстааааа
Где-то справа от каретки на информационной ленте находится непрерывный массив меток. Написать программу для машины Поста, которая передвигает каретку в сторону массив меток, проходит по массиву и останавливается в первой пустой ячейке после массива
Читайте также
Помогите пожалуйста!! ) составить программу в "Pascal abc"!!)
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
Начав тренировку лыжник в 1 день пробежал 10 км. Каждый след. день он увеличивал длину пробега на 10% от пробега предыдущего дня. Определить: а)в какой
день он пробежал больше 20 км. б) в какой день суммарный пробег за все дни превысит 100 км? Задача по информатике, надо составить программу в pascal abc. Помогите!
Вы находитесь на странице вопроса "составить программу в Pascal ABC , которая строит изображение предмета в плоском зеркале (расстояние от предмета до зеркала вводится с клавиатуры)", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.