Задачи вида "Развилка" (Текстовые задачи)

@chelovecheck · Регистрация: 19.06.2016

Студворк — интернет-сервис помощи студентам

Здравствуйте, пожалуйста помогите написать проги в QBasic по решению задач:

Задача №1
Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник, и если да, то будет ли он прямоугольным.

Задача №2
Программа — льстец. На экране высвечивается вопрос «Кто ты: мальчик или девочка? Введи Д или М». В зависимости от ответа на экране должен появиться текст «Мне нравятся девочки!» или «Мне нравятся мальчики!».

Задача №3
Составить программу, определяющую, пройдет ли график функции у = ах2 + bх + с через заданную точку с координатами (т, n).

P.S. Буду очень сильно благодарен, закрываю практику в универе

echs · 19.06.2016, 16:19

проверено

1

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
CLS
INPUT "A,B = "; a, b
 
c = a + b
 
IF c < 180 THEN
   IF a = 90 OR b = 90 OR c = 90 THEN
      PRINT "YES, PRYAMOUGOLNYI"
   ELSE
      PRINT "YES, NE PRYAMOUGOLNYI"
   END IF
ELSE
   PRINT "NO"
END IF
END

2

QBasic/QuickBASIC
1
2
3
4
5
6
7
8
9
10
11
CLS
DIM x AS STRING
PRINT "MALCHICK or DEVOCHKA ?"
INPUT "M or D = "; x
 
IF x = "M" OR x = "m" THEN
   PRINT "I LOV MALCHICK"
ELSEIF x = "D" OR x = "d" THEN
   PRINT "I LOV DEVOCHKA"
END IF
END

3

QBasic/QuickBASIC
1
2
3
4
5
CLS
INPUT "A,B,C = "; a, b, c
INPUT "X,Y = "; x, y
IF y = a * x ^ 2 + b * x + c THEN PRINT "YES" ELSE PRINT "NO"
END

@chelovecheck · 19.06.2016, 16:33 **[ТС]**

Огромное спасибо

@chelovecheck · 20.06.2016, 19:39 **[ТС]**

Немного исправил ваш ответ, во 2-ой строчке 1-ой задачи A and B должны вписываться раздельно иначе выдается ошибка

echs · 20.06.2016, 20:18

chelovecheck
У вас точно QBASIC.?
Во второй строке ошибки точно нет.

@chelovecheck · 20.06.2016, 20:35 **[ТС]**

точно QBasic, версию может быть сказать?

echs · 21.06.2016, 07:37

chelovecheck
А когда вы вводите числа, вы разделяете их ЗАПЯТОЙ?

@chelovecheck · 21.06.2016, 20:23 **[ТС]**

конечно, спасибо, но я думаю разницы в раздельности ввода чисел не имеет значения

Новые блоги и статьи Все статьи Все блоги /
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .

@chelovecheck 1 / 1 / 0 Регистрация: 19.06.2016 Сообщений: 53

	Задачи вида "Развилка" (Текстовые задачи) 19.06.2016, 15:46. Показов 2083. Ответов 7 Метки нет (Все метки) Здравствуйте, пожалуйста помогите написать проги в QBasic по решению задач: Задача №1 Даны два угла треугольника (в градусах). Определить, существует ли такой треугольник, и если да, то будет ли он прямоугольным. Задача №2 Программа — льстец. На экране высвечивается вопрос «Кто ты: мальчик или девочка? Введи Д или М». В зависимости от ответа на экране должен появиться текст «Мне нравятся девочки!» или «Мне нравятся мальчики!». Задача №3 Составить программу, определяющую, пройдет ли график функции у = ах2 + bх + с через заданную точку с координатами (т, n). P.S. Буду очень сильно благодарен, закрываю практику в универе 0

@chelovecheck 1 / 1 / 0 Регистрация: 19.06.2016 Сообщений: 53
	19.06.2016, 16:33 [ТС]
	Огромное спасибо 0

@chelovecheck 1 / 1 / 0 Регистрация: 19.06.2016 Сообщений: 53
	20.06.2016, 19:39 [ТС]
	Немного исправил ваш ответ, во 2-ой строчке 1-ой задачи A and B должны вписываться раздельно иначе выдается ошибка 0

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	20.06.2016, 20:18
	chelovecheck У вас точно QBASIC.? Во второй строке ошибки точно нет. 0

@chelovecheck 1 / 1 / 0 Регистрация: 19.06.2016 Сообщений: 53
	20.06.2016, 20:35 [ТС]
	точно QBasic, версию может быть сказать? 0

echs Регистрация: 23.10.2013 Сообщений: 5,076 Записей в блоге: 8
	21.06.2016, 07:37
	chelovecheck А когда вы вводите числа, вы разделяете их ЗАПЯТОЙ? 0

@chelovecheck 1 / 1 / 0 Регистрация: 19.06.2016 Сообщений: 53
	21.06.2016, 20:23 [ТС]
	конечно, спасибо, но я думаю разницы в раздельности ввода чисел не имеет значения 0

Задачи вида "Развилка" (Текстовые задачи)

Решение