Вернуться   Компьютерный форум > Компьютеры > Программы > Программирование
 
 
Опции темы
Старый 16.12.2013, 19:12   #1 (ссылка)
Новичок
 
Регистрация: 16.12.2013
Сообщений: 2
Репутация: 0
По умолчанию помогите с задачей и блоксхемой

ввести n(любое количество) чисел и расположить в порядке убывания
бейсик,код и блок-схема
qbonesq вне форума  
Старый 16.12.2013, 20:21   #2 (ссылка)
Новичок
 
Регистрация: 19.05.2011
Сообщений: 33
Репутация: 1
По умолчанию

О каком бейсике идет речь: QBasic, VB (Visual Basic), VB .NET, VBA?
Urian вне форума  
Старый 17.12.2013, 19:38   #3 (ссылка)
Новичок
 
Регистрация: 16.12.2013
Сообщений: 2
Репутация: 0
По умолчанию

QBasic
qbonesq вне форума  
Старый 18.12.2013, 10:22   #4 (ссылка)
Новичок
 
Регистрация: 19.05.2011
Сообщений: 33
Репутация: 1
По умолчанию

CLS

DIM n AS INTEGER
DIM i AS INTEGER
DIM j AS INTEGER
DIM tmp AS INTEGER

INPUT n

REDIM ar(1 TO n)
FOR i = 1 TO n
INPUT ar(i)
NEXT i

FOR i = 1 TO n - 1
FOR j = i + 1 TO n
IF ar(i) < ar(j) THEN
tmp = ar(i)
ar(i) = ar(j)
ar(j) = tmp
END IF
NEXT j
NEXT i

FOR i = 1 TO 5
WRITE ar(i)
NEXT i


Блок-схему, извиняйте, нарисовать не смогу. Попробуйте найти в интернете программу для автоматического составления блок-схем

Последний раз редактировалось Urian; 18.12.2013 в 10:44.
Urian вне форума  
Ads
 


Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 
Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
помогите с задачей RavilTuljakov Программирование 0 10.06.2013 08:34
помогите,пожалуйста с задачей((( AlinkaMalina Программирование 0 03.05.2011 15:19
Помогите пож с задачей) Ser_VRN Программирование 4 08.04.2011 17:01
Помогите с задачей на рекурсию! Паскаль. Svetlanka_1 Программирование 0 20.11.2010 15:51
Помогите с задачей С++! Negetn Программирование 1 05.09.2009 12:12


Текущее время: 19:58. Часовой пояс GMT +4. Powered by vBulletin® Version 5.8.9
Copyright ©2000 - 2016, Jelsoft Enterprises Ltd.