Форум программистов, компьютерный форум, киберфорум
Наши страницы
QBasic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
mkecko
0 / 0 / 0
Регистрация: 15.12.2010
Сообщений: 3
#1

программы

02.05.2011, 23:49. Просмотров 569. Ответов 4
Метки нет (Все метки)

Функции и подпрограммы:
11. Вычислить , где - сумма всех целых чисел от X до Y
12. Даны числа A, B, C, D. Найти: (A+D)/(B+С). Результат представить в виде
правильной несократимой дроби.
13. Даны числа A, B, C, D. Найти: (A*D)/(B*С). Результат представить в виде
правильной несократимой дроби.
14. Даны числа A, B, C. Найти: (A!+B!)/C! Результат представить в виде
правильной несократимой дроби.
15. Составить программу для сложения трех дробей. Результат представить в виде
правильной несократимой дроби.

Работа с файлами:
16. Создать текстовый файл «VES.dat». Записать в файл 10 чисел. Вывести из файла
максимальное число.
17. Создать текстовый файл «NAME.dat». Записать в файл 10 имен. Вывести из файла
количество имен, содержащих 4 буквы.
18. Создать текстовый файл «FAM.dat». Записать в файл 10 фамилий. Вывести из
файла самую длинную фамилию.
19. Создать текстовый файл «FAM.dat». Записать в файл 10 фамилий. Отсортировать
фамилии в файле по алфавиту.
20. Создать текстовый файл «FAM.dat». Записать в файл 10 фамилий. Вывести все
фамилии на букву «А».

Графика:
21. Нарисовать движение квадрата со стороной 20 по «второстепенной» диагонали
экрана.
22. Изобразить круг c R=8, движущийся по параболе y=2x2-3x+1.
23. Построить графики функций y=sin(x) и y=x3-x2+x-1.
24. Изобразить движение круга с R=10 по периметру экрана.
25. Изобразить квадрат со стороной 10 движущийся по кругу с R 200.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.05.2011, 23:49
Ответы с готовыми решениями:

Как обойти ограничение размера программы или объема данных без создания дополнительных файлов программы.
Привет всем! Есть ли возможность увеличить допустимый размер файла программы ...

Запуск из программы с админскими привилегиями внешней программы без прав админа
Нужно в программе которая запущенна под амином запустить другую программу без...

Программы автозагрузки Windows в реестре. Отключение программы без удаления записи
Как узнать включена ли автозагрузка программы в реестре Windows и как отключить...

Процесс программы висит в диспетчере задач даже после закрытия программы
Помогите пожайлуйста с решением этой проблемы. Сдача проекта уже скоро, а тут...

IntelliTrace остается в процессах после закрытия программы. Правильное завершение программы?
Много (очень много) раз запускал программу, закрывал через крестик. Вдруг винда...

4
кот Бегемот
Платежеспособный зверь
8449 / 3888 / 1511
Регистрация: 28.10.2009
Сообщений: 10,063
03.05.2011, 02:24 #2
15 задач - это фигня. Тут одна дурочка 45 задач однажды выложила в наивной надежде, что ей всё решат. Ну, ты недалеко от неё ушёл. Жди, родной, жди. Может, дождёшься.
0
echs
Регистрация: 23.10.2013
Сообщений: 5,076
Записей в блоге: 8
17.06.2016, 09:07 #3
12. проверено

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
DECLARE FUNCTION NOD! (a!, b!)
CLS
INPUT "A,B,C,D = "; a, b, c, d
 
p = a + d
q = b + c
n = NOD(p, q)
p = p / n
q = q / n
 
IF q = 1 THEN PRINT p ELSE PRINT p; " / "; q
END
 
FUNCTION NOD (a, b)
   IF a = 0 OR b = 0 THEN
      NOD = a + b
   ELSE
      IF a > b THEN
         NOD = NOD(a MOD b, b)
      ELSE
         NOD = NOD(a, b MOD a)
      END IF
   END IF
END FUNCTION
0
magirus
17.06.2016, 09:19
  #4

Не по теме:

geh, тема 11 года... автору уже давно нинада...

0
echs
17.06.2016, 10:05     программы
  #5

Не по теме:


magirus
Вы правы. Автору точно не надо. Но не иссякнет поток
страждущих и стремящихся к знаниям, как цветок к солнцу...
Сбылось предсказание кот Бегемот.
"Жди, родной, жди. Может, дождёшься." - ДОЖДАЛСЯ!

0
17.06.2016, 10:05
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
17.06.2016, 10:05
Привет! Вот еще темы с ответами:

При запуске любой программы MS Office происходит псевдо установка программы
Приветствую. Беда с пакетом. Он нелицензионный, поломаный, может оттого, но...

Можно ли сохранить последний результат работы программы непосредственно в коде программы
Можно ли сохранить последний результат работы программы непосредственно в коде...

Ошибки при запуске программы из другой программы - неверная рабочая директория
Вот у меня есть несколько программ написанных под VisualBasic.net. После...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru