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*
Комментарий*

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

masamosijcuk140244
Zimin1111
Ioanova Korneeva1093
Владимировна Екатерина
Antonov-Elena
achernakov
КристинаАлександр
patersimon1
Ka2ffka141
alex-kuzora4411
aobuhta4
Бурмистров_Салагин1074
Бирюков Карпова1379
aksmobile
danielianruz