Важная информация
Показано с 1 по 3 из 3

Тема: Помогите перевести на Basic с C

  1. #1 Помогите перевести на Basic с C 
    Разбирающийся Аватар для Denis
    Регистрация
    24.10.2011
    Адрес
    РК ВКО Зыряновский район г Серебрянск
    Сообщений
    38
    Сказал(а) спасибо
    3
    Поблагодарили 0 раз(а) в 0 сообщениях
    Это код сортировки на с ,а как на Basic-e

    for i=1..n-1{
    for j=i+1..n{
    if(a[i] > a[j]) a[i] <---> a[j];
    }
    }
    Ответить с цитированием  
     

  2. #2  
    Супер модератор Аватар для Kakos_nonos
    Регистрация
    07.01.2011
    Адрес
    Кубань
    Сообщений
    1,531
    Сказал(а) спасибо
    126
    Поблагодарили 428 раз(а) в 291 сообщениях
    Записей в блоге
    6
    Вот на бейсике:
    Код qbasic:
    FOR j = 1 TO n - 1
    FOR i = 1 TO n - 1
    IF a(i) < a(i + 1) THEN
    u = a(i)
    a(i) = a(i + 1)
    a(i + 1) = u
    END IF
    [Ссылки могут видеть только зарегистрированные пользователи. ]
    Ответить с цитированием  
     

  3. #3  
    Профи Аватар для Dimon012
    Регистрация
    09.02.2011
    Адрес
    Владивосток
    Сообщений
    850
    Сказал(а) спасибо
    29
    Поблагодарили 130 раз(а) в 108 сообщениях
    Записей в блоге
    3
    Код :
    n = 10
    DIM a(n)
    FOR i = 1 TO n - 1
        FOR j = i + 1 TO n
            IF a(i) > a(j) THEN
                a = a(i)
                a(i) = a(j)
                a(j) = a
            END IF
        NEXT
    NEXT
    Ответить с цитированием  
     

Информация о теме
Пользователи, просматривающие эту тему

Эту тему просматривают: 1 (пользователей: 0 , гостей: 1)

Похожие темы

  1. Помогите перевести на BASIC с Pascal
    от Denis в разделе QBasic
    Ответов: 0
    Последнее сообщение: 24.01.2012, 19:08
  2. Помогите перевести на BASIC с С
    от Denis в разделе QBasic
    Ответов: 0
    Последнее сообщение: 24.01.2012, 19:01
  3. Перевести с C++ на Basic
    от Denis в разделе QBasic
    Ответов: 0
    Последнее сообщение: 20.01.2012, 17:16
  4. Перевести с Pascal на Basic
    от Denis в разделе QBasic
    Ответов: 0
    Последнее сообщение: 20.01.2012, 17:14
  5. перевести на basic с pascal
    от екатерина но в разделе QBasic
    Ответов: 2
    Последнее сообщение: 16.07.2011, 13:48
Ваши права
  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •