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

Rizo4ka101296 6 янв. 2020 г., 07:40:12

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

Taty228 22 нояб. 2020 г., 01:13:16 | 10 - 11 классы

Ребята?

Ребята!

Помогите пожалуйста!

Работаем в PascalABC.

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

Очень срочно.

Заранее спасибо).

Laisrem13 8 дек. 2020 г., 23:51:41 | 10 - 11 классы

Pascal abc Написать программу, которая бы вводила с клавиатуры два символа и выводила на экран тот, код которого больше (использовать операцию сравнения символов)?

Pascal abc Написать программу, которая бы вводила с клавиатуры два символа и выводила на экран тот, код которого больше (использовать операцию сравнения символов).

43178gh 12 окт. 2020 г., 03:35:12 | 5 - 9 классы

Составить программу нахождения скорости пешехода, если расстояние и время прохождения вводятся с клавиатуры?

Составить программу нахождения скорости пешехода, если расстояние и время прохождения вводятся с клавиатуры.

Evelinakotova 27 окт. 2020 г., 12:03:08 | 5 - 9 классы

Типы данных, условный оператор, операторы ввода / вывода, написать программу сложения 3 цифр, которые будут вводиться с клавиатуры?

Типы данных, условный оператор, операторы ввода / вывода, написать программу сложения 3 цифр, которые будут вводиться с клавиатуры.

(pascal abc).

Music333 10 мар. 2020 г., 19:03:49 | 10 - 11 классы

Напишите программу которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведениеpascal?

Напишите программу которая вводит с клавиатуры 10 чисел и вычисляет их сумму и произведение

pascal.

Qazxswedc2014 11 июл. 2020 г., 02:56:10 | 10 - 11 классы

Программа в Pascal ABC?

Программа в Pascal ABC.

С клавиатуры вводится два слова.

Надо вывести на экран те буквы, которые есть и в одном и во втором слове (печатать буквы без повторений).

GlebovichPolinka 22 дек. 2020 г., 15:42:26 | 10 - 11 классы

Pascal abc Написать программу, которая вводит с клавиатуры строку и выводит на экран символ, код которого в два раза больше, чем количество символов в исходной строке (использовать функции Length и ch?

Pascal abc Написать программу, которая вводит с клавиатуры строку и выводит на экран символ, код которого в два раза больше, чем количество символов в исходной строке (использовать функции Length и chr).

Vika19973 10 февр. 2020 г., 04:51:12 | 10 - 11 классы

Pascal ABC?

Pascal ABC.

Написать программу, которая находит сумму четных элементов массива произвольного размера (размер и элементы массива вводятся с клавиатуры).

Кристина1309 2 янв. 2020 г., 13:51:03 | 5 - 9 классы

PASCAL ABC?

PASCAL ABC!

Составьте программу подсчета количества часов, минут и секунд в данном количестве суток.

Количество суток вводится с клавиатуры.

Владсушков 12 окт. 2020 г., 20:30:31 | 10 - 11 классы

В программе Pascal ABC составьте программу, которая вычисляет произведение n чисел вводимых с клавиатуры?

В программе Pascal ABC составьте программу, которая вычисляет произведение n чисел вводимых с клавиатуры.