Где описываются подпрограммы? (язык программирования Паскаль)

В любом месте программы

Между разделом var и программным блоком главной программы

В начале программы до оператора begin

В начале программы после оператора begin​

200: 2

100|0

50|0

25|0

12|1

6|0

3|0

1|1

0|1

200₁₀=11001000₂

489: 2

244|1

122|0

61|0

30|1

15|0

7|1

3|1

1|1

0|1

489₁₀=111101001₂

543: 2

271|1

135|1

67|1

33|1

16|1

8|0

4|0

2|0

1|0

0|1

543₁₀=1000011111₂

950: 2

475|0

237|1

118|1

59|0

29|1

14|1

7|0

3|1

1|1

0|1

950₁₀=1110110110

1025: 2

512|1

256|0

128|0

64|0

32|0

16|0

8|0

4|0

2|0

1|0

0|1

1025₁₀=10000000001₂

первую фигуру мы можем раскрасить в 6 цветов, вторую - в 5, третью- в 4, и т.д. а первую - в 3 цвета

6*5*4*3=360

ответ 360 способов

include < iostream>

using namespace std;

int main()

{int n;

  cin > > n;

switch(n)

        {case 1: cout< < "i"; break;

          case 5: cout< < "v"; break;

          case 10: cout< < "x"; break;

          case 50: cout< < "l"; break;

          case 100: cout< < "c"; break;

          case 500: cout< < "d"; break;

          case 1000: cout< < "m"; break;

        }

return 0;

}

картинка длжна быть в папке с программой и быть в формате bmp

usesgraphabc;

varn: string; b: picture; s: integer;

beginwriteln('введите расстояние до зеркала'); 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.