6. Массив командаларын иэтижесімен сәйкестендір (4) A = [0,0,2,4,6,2,8,9, 7, O]
1. print(A.count(2))
2. print(max(А))
3. print(Acount(10))
4. print(Aindex(6))
А. 9
В,
С, 2
D, (0)

ответ:

код c++, но нужен pascal:

1. // меньшиков. тренировка 7.

2. // 7c. игра умножения [multgame]

3. // дп с запоминанием, использующим map. доступ к ответу решенной за o(logn)

4. // ibelyaev: 25nov2010

5. #include

6. #include

7. #include

8.

9. using namespace std;

10.

11. int n;

12. void input()

13. {

14. cin> > n;

15. }

16. map memiswin;

17. // 1 - win

18. // -1 - not win

19. short iswin(long long value)

20. {

21. if (memiswin[value] ! = 0)

22. return memiswin[value];

23. short iscurwin = -1;

24. for (int i=2; i< =9; i++)

25. {

26. if (value * i > = n || iswin(value*i) == -1)

27. {

28. iscurwin = 1;

29. break;

30. }

31. }

32. memiswin[value] = iscurwin;

33. return iscurwin;

34. }

35. void solve()

36. {

37. if (iswin(1) == 1)

38. cout< < "stan wins.";

39. else

40. cout< < "ollie wins.";

41. }

42. int main()

43. {

44. freopen("input.txt","r",stdin);

45. freopen("output.txt","w",stdout);

46.

47. input();

48. solve();

49. return 0;

50. }

объяснение:

не уверен что тебе это подойдет.

у тебя вроде не полностью записано.