Aleksei Biketova
?>

Вопросы 1. Назовите основные части окна Lazarus. 2. Из каких вкладок состоит палитра компонентов? 3. Опишите функции кнопок, расположенные на странице Standard? 4. На какие виды можно разделить кнопки по выполняемой функции? 5. Какие события определяются нажатием на мышь? б. Как реализуется выбор фона и цвета текста компонентов Labe1 и Edit? 7. В чем отличие окна IDE Lazarus от окна процедурного языка?​

Информатика

Ответы

ilyanedelev
Рассматривая различные прямоугольники и подсчитывая в них число поворотов P, можно прийти к следующему алгоритму. Для любого натурального k получаем:
P=\begin {cases} 0, \ min(M,N)=1 
\\4k-2, \ min(M,N)=2k, \, M=N, \, k \in \mathbb N \\ 4k-1, \ 
min(M,N)=2k, \, M \neq N, \, k \in \mathbb N \\ 4k, \ min(M,N)=2k+1, \,
 M=N, \, k \in \mathbb N \\ 4k+1, \ min(M,N)=2k+1, \, M \neq N, \, k 
\in \mathbb N \\ \end {cases}

var
  M, N, k, mn, P: integer;
  f: Text;

begin
  Assign(f, 'input.txt');
  Reset(f);
  Readln(f, M, N);
  Close(f);
  if M < N then mn := M else mn := N;
  if mn = 1 then P := 0
  else begin
    k := mn div 2;
    if mn mod 2 = 0 then
      if M = N then P := 4 * k - 2
      else P := 4 * k - 1
    else
    if M = N then P := 4 * k
    else P := 4 * k + 1
  end;
  Assign(f, 'output.txt');
  Rewrite(f);
  Writeln(f, P);
  Close(f)
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Вопросы 1. Назовите основные части окна Lazarus. 2. Из каких вкладок состоит палитра компонентов? 3. Опишите функции кнопок, расположенные на странице Standard? 4. На какие виды можно разделить кнопки по выполняемой функции? 5. Какие события определяются нажатием на мышь? б. Как реализуется выбор фона и цвета текста компонентов Labe1 и Edit? 7. В чем отличие окна IDE Lazarus от окна процедурного языка?​
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kulturarai44
Меладзе_Владимир1695
Pastushenkoen
tnkul
neblondinka19
leonid-adv70
lirene
соловьев_Куркина
Mydariamiro
AlekseiBunina1895
Корягина
kirillreznikov
Guru-tailor
safin8813
melissa-80