М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
nucubidzezura
nucubidzezura
30.04.2022 19:51 •  Информатика

Записать адрес файла program.exe, хранящегося на компьютере, зарегистрированном в домене верхнего уровня ru, домене второго уровня my и имеющем собственное имя доступа к файлу - протокол передачи файлов).

👇
Ответ:
lesikon11
lesikon11
30.04.2022
Ftp://ftp.my.ru/program.exe
4,4(70 оценок)
Открыть все ответы
Ответ:
djonni74
djonni74
30.04.2022

События – это действия, совершаемые пользователем или операционной системой.

Например:

действия пользователя – нажатие клавиши на клавиатуре, щелчок мыши и т.д.;

действия операционной системы – активизация окна, посылка сигнала таймера и т. д.

При возникновении события Windows посылает соответствующее сообщение, которое может быть воспринято и обработано программой.

В Pascal Windows Forms каждому событию присвоено имя. Например, щелчок кнопкой мыши – это событие Click,  нажатие клавиши клавиатуры -  KeyPress.

Реакцией на событие должно быть какое-либо действие. Реакция на событие реализуется как процедура обработки события (обработчик события). Таким образом, для того чтобы программа выполняла некоторую работу в ответ на действия пользователя, программист должен написать процедуру обработки соответствующего события.

Событие Назначение

Click Происходит, когда пользователь выбирает элемент управления с одинарного щелчка кнопкой мыши

Changed Происходит при изменении значения в элементе управления

KeyPress Происходит, когда пользователь нажимает любую клавишу символа  на клавиатуре, кроме функциональных и клавиш управления курсором

KeyUp Происходит, когда пользователь отпускает клавишу (Up - вверх)

KeyDown Происходит при нажатии пользователем какой-либо клавиши (включая вс и функциональные Ctrl, Alt, Shift) в тот момент, когда ЭУ находится в фокусе (Down -вниз)

MouseUp Происходит при отпускании кнопки мыши  

MouseDown Происходит при нажатии кнопки мыши  

MouseMove Происходит при перемещении указателя мыши над элементом управления

DoubleClick Происходит, когда пользователь выбирает элемент управления с двойного щелчка кнопкой мыши

Процедуры обработки событий (Обработчики событий)  – это подпрограммы (фрагменты программы), задающие действия, которые приложение должно выполнить в ответ на какое-то событие.

Написание процедуры обработки события

Выделить элемент управления.

Перейти на страницу События Инспектора Объектов.

Выделить нужное событие.

Дважды щелкнуть по белому полю перед названием события, при этом автоматически создается шаблон для обработчика события.

Написать код, который должен выполняться в ответ на это событие между begin и end.

Объяснение:

Події-це дії, що здійснюються користувачем або операційною системою.

Наприклад:

дії користувача-натискання клавіші на клавіатурі, клацання миші і т. д.;

дії операційної системи-активізація вікна, посилка сигналу таймера і т. д.

При виникненні події Windows посилає відповідне повідомлення, яке може бути сприйнято і оброблено програмою.

У Pascal Windows Forms кожній події присвоєно ім'я. Наприклад, клацання кнопкою миші-це подія Click, натискання клавіші клавіатури-KeyPress.

Реакцією на подію має бути будь-яка дія. Реакція на подію реалізується як процедура обробки події (обробник події). Таким чином, для того щоб програма виконувала деяку роботу у відповідь на дії користувача, програміст повинен написати процедуру обробки відповідної події.

Подія Призначення

Click відбувається, коли користувач вибирає елемент управління за до одинарного клацання кнопкою миші

Changed відбувається при зміні значення в елементі управління

KeyPress відбувається, коли користувач натискає будь-яку клавішу символу на клавіатурі, крім функціональних і клавіш управління курсором

KeyUp відбувається, коли користувач відпускає клавішу (Up-вгору)

KeyDown відбувається при натисканні користувачем будь-якої клавіші (включаючи допоміжні і функціональні Ctrl, Alt, Shift) в той момент, коли ЕУ знаходиться у фокусі (Down-вниз)

MouseUp відбувається при відпуску кнопки миші

MouseDown відбувається при натисканні кнопки миші

MouseMove відбувається при переміщенні покажчика миші над елементом управління

DoubleClick відбувається, коли користувач вибирає елемент управління за до подвійного клацання кнопкою миші

Процедури обробки подій – обробники подій)-це підпрограми (фрагменти програми), що задають дії, які програма повинна виконати у відповідь на якусь подію.

Написання процедури обробки події

Виділити елемент керування.

Перейти на сторінку події Інспектора Об'єктів.

Виділити потрібну подію.

Двічі клацнути по білому полю перед назвою події, при цьому автоматично створюється шаблон для обробника події.

Написати код, який повинен виконуватися у відповідь на цю подію між begin і end.

4,4(30 оценок)
Ответ:
gg322
gg322
30.04.2022
Основа взята на сайте progmatem.ru. К сожалению, автор статьи там не был указан.

// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
  w=1000;
  h=600;

function f(x:real):=0.5*x*cos(2*x);

begin
  SetWindowSize(w,h);
  // поле для графика в окне
  var xLeft:=50;
  var yLeft:=50;
  var xRight:=w-xLeft;
  var yRight:=h-yLeft;
  // интервалы по осям
  var ax:=-12.0;
  var bx:=12.0;
  var hx:=1.0;
  var ay:=-6.5; // минимум f(x) с запасом
  var by:=6.5;
  var hy:=0.5;
  // масштабы по осям
  var mx:=(xRight-xLeft)/(bx-ax);
  var my:=(yRight-yLeft)/(by-ay);
  // точка начала координат графика
  var x0:=xLeft+Trunc(abs(ax)*mx);
  var y0:=yRight-Trunc(abs(ay)*my);
  // рисование координатных осей
  Line(xLeft,y0,xRight+10,y0);
  Line(x0,yLeft-10,x0,yRight);
  SetFontSize(12); SetFontColor(clBlue);
  TextOut(xRight+15,y0-10,'X');
  TextOut(x0-4,yLeft-30,'Y');
  SetFontSize(8); SetFontColor(clGreen);
  // рисование засечек
  var s:string;
  for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
  for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
  // собственно график
  var xi:=ax;
  while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

*******************************************
// PascalABC.NET 3.1, сборка 1204 от 24.03.2016
uses graphABC;
const
  w=1000;
  h=600;

function f(x:real):=8*sin(x)*sin(2*x);

begin
  SetWindowSize(w,h);
  // поле для графика в окне
  var xLeft:=50;
  var yLeft:=50;
  var xRight:=w-xLeft;
  var yRight:=h-yLeft;
  // интервалы по осям
  var ax:=-15.0;
  var bx:=15.0;
  var hx:=1.0;
  var ay:=-6.5; // минимум f(x) с запасом
  var by:=6.5;
  var hy:=0.5;
  // масштабы по осям
  var mx:=(xRight-xLeft)/(bx-ax);
  var my:=(yRight-yLeft)/(by-ay);
  // точка начала координат графика
  var x0:=xLeft+Trunc(abs(ax)*mx);
  var y0:=yRight-Trunc(abs(ay)*my);
  // рисование координатных осей
  Line(xLeft,y0,xRight+10,y0);
  Line(x0,yLeft-10,x0,yRight);
  SetFontSize(12); SetFontColor(clBlue);
  TextOut(xRight+15,y0-10,'X');
  TextOut(x0-4,yLeft-30,'Y');
  SetFontSize(8); SetFontColor(clGreen);
  // рисование засечек
  var s:string;
  for var i:=1 to Round((bx-ax)/hx)+1 do begin
    var num:=ax+(i-1)*hx;
    var x:=xLeft+Trunc(mx*(num-ax));
    Line(x,y0-3,x,y0+3);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x-TextWidth(s) div 2,y0+10,s)
    end;
  for var i:=1 to Round((by-ay)/hy)+1 do begin
    var num:=ay+(i-1)*hy;
    var y:=yRight-Trunc(my*(num-ay));
    Line(x0-3,y,x0+3,y);
    Str(num,s);
    if abs(num)>1E-15 then TextOut(x0+7,y-TextHeight(s) div 2,s)
    end;
    TextOut(x0-10,y0+10,'0');
  // собственно график
  var xi:=ax;
  while xi<=bx do begin
    var yi:=f(xi);
    var x:=x0+Round(xi*mx);
    var y:=y0-Round(yi*my);
    if (y>=yLeft) and (y<=yRight) then SetPixel(x,y,clRed);
    xi+=1e-3
    end
end.

Составьте программу, которая строит график зависимости: а) y(x)=0.5x *cos 2x на промежутке [-12; 12]
Составьте программу, которая строит график зависимости: а) y(x)=0.5x *cos 2x на промежутке [-12; 12]
4,7(1 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ