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.

0 0

4 года назад

Прошуу памогите люди информатикой файл размером 8 кбайт передается через некоторое соединение со скоростью 2048 бит в секунду оп

Анастасия1000

Для начала надо, I1 -(Обьём файла) перевести из килобайт в байты и скорость соединения из бит в байты.
I1=8кбайт×1024=8'192байт
u1=2048÷8=256 байт
u2=1440÷8=180 байт
Теперь, чтобы найти t(Время), надо (I1÷u1)
t=8'192÷256=32 сек.
А чтобы найти I2 нужно
I=t×u ; I=32×180=5'760 байт
Ответ:I2=5'760
P.S: Знак (') я писал, чтобы легче было распознать число.

0 0

4 года назад

Запишите на языке Паскаль выражение,которое истинно ,если переменная х принадлежит заштрихованной области

Маниша

IF ((x >= 2) AND (x < 3))
THEN WRITELN("Входит")
ELSE WRITELN("Не входит");

0 0

4 года назад

Напишите программу которая после ввода 4 положительных чисел от 0 до 99 находит наименьшее из них

Лео Подпольный [7]

Вот программа, она находит наименьшее число до 99

0 0

4 года назад

Прочитать ещё 2 ответа