Форум программистов, компьютерный форум, киберфорум
Наши страницы

Пишем свой интерпретатор языка BASIC - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Меню и список http://www.cyberforum.ru/cpp-beginners/thread41194.html
Здравствуйте форумчане. Помоги пожалуйста в следующем вопросе: У меня есть 2связный список, написано меню. Но в моменте когда написано make a list и delete custom необходимо чтобы выводились:...
C++ Здравствуйте! Не могу поместить class в один файл с программой. file.hpp #include "Cat.hpp" // здесь классы "2)" Cat::Cat(int initialAge) { itsAge = initialAge; } Cat::~Cat() { http://www.cyberforum.ru/cpp-beginners/thread41186.html
Массивы строк C++
Привет всем! Задан массив строк. Как узнать который символ встечаетса найбольшое количество раз в етом массиве?
C++ вывод на экран набор треугольников и квадратов, которые произвольно двигаются и меняют размер
Please, help me!!! Вот текст программы, которая выводит на экран набор треугольников и квадратов, которые произвольно двигаются и меняют размер только квадратов. Проблема в том, что необходимо...
C++ Округление дробного числа до целого в большую сторону. http://www.cyberforum.ru/cpp-beginners/thread41139.html
Доброго дня. Я новичок в программирование на Visual C++. Проблема такая программа должна считать кол-во месяцев, если числа целые то программа шла дальше, если дробное то (например 3.33333) ...
C++ Код из Delphi в C++ Нужно написать курсовую на C++. Сам я в программировании плохо шарю (не программист). Попросил у народу помощи, помогли. Но решение на Delphi: {$APPTYPE CONSOLE} type byteset=set of byte; ... подробнее

Показать сообщение отдельно
#pragma
Временно недоступен
954 / 225 / 6
Регистрация: 12.04.2009
Сообщений: 921
26.09.2009, 02:20  [ТС]
Кое-как смог сделать массивы,хотя не уверен,полностью ли правильно,буду тестировать.Как-то у меня громоздко получилось,запутано всё так.У тебя по виду всё так просто сделано с массивами,мне же пришлось добавлять функциональности чуть ли не по всей программе,и ещё осталось (особенно связано с типизацией).
Но с виду работает.Рабочий пример (в ревизии 30):
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
   IF B1 THEN LET C=1: LET D=2 ELSE LET C=10: LET D=20
   PRINT C
   PRINT
   PRINT D
   PRINT
 
   ' Повторяем предыдущий код, но с таким условием, чтобы исполнилось ELSE
   IF B1-460 THEN LET C=1: LET D=2 ELSE LET C=10: LET D=20
   PRINT C
   PRINT
   PRINT D
   PRINT
 
   'Here we define and calculate array
    DIM array(3,10)
 
    LET array(0,9) = 2
 
    LET i = 0
    LET j = 0
 
    WHILE i < 3
      WHILE j < 10
           LET array(i,j) = i+j
           LET j = j+1
      WEND
      LET i = i+1
    WEND
 
    LET i = 0
    LET j = 0
 
    WHILE i < 3
      WHILE j < 10
           PRINT "array(",i,",",j,") is: ",array(i,j)
         PRINT
           LET j = j+1
      WEND
      LET i = i+1
    WEND
 
   ' Считаем сумму чисел от 1 до 100
   LET COUNT=0
   1:
   WHILE COUNT<100
      LET COUNT=COUNT+1
      PRINT COUNT," "
      IF COUNT<50 THEN GOTO 1 ELSE GOTO 2
   WEND
   2:
   PRINT
   PRINT "END OF PROGRAM"
Добавлено через 54 минуты
С
таким примером
PureBasic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
' Работа с многомерным массивом
DIM AA(2,3,4)
LET COUNT = 100
LET i = 0
WHILE i < 2 
  LET j = 0
  WHILE j < 3 
    LET k = 0
    WHILE k < 4 
      LET COUNT = COUNT + 1
      LET AA(i,j,k) = COUNT
      LET k = k + 1
    WEND
    LET j = j + 1
  WEND
  LET i = i + 1
WEND
PRINT COUNT     
PRINT
PRINT AA(1,2,3) 
PRIN
прога вылетает - vector out of range - где-то напутал с индексами,буду чинить...

Добавлено через 19 минут
Всё,вроде поправил.Evg,а утебя работают цвета в консоли,если скриптом прогоняешь тесты? А то я сделал,но не знаю,будет ли везде работать. Я слышал,что это может не работать на некоторых терминалах/системах (в смысле другие управляющие символы для цветов).
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru