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

@meatzor · Регистрация: 08.04.2012

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

1. Напишите программу, в которой бы пользователь мог ввести название города-юбиляра (N) и количество исполнившихся ему лет (Х). После нажатия кнопки ОК должно выйти окно с поздравлением: “Поздравляем жителей города N с Х-летием!!!”.

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

3. Напишите программу, которая по знаку математической операции выводит её название. (+ - сложение, * - умножение)

4. Вычислите множество значений функции y=x 52 0+b для аргумента х, изменяющегося от -10 до 10 с шагом 2, при b=5.

5. Вычислите значение n! для n=7. Ответ: 5040.

Пожалуйста помогите хоть какие-нибудь из них написать.
Заранее спасибо!

@Alex77755 · 08.04.2012, 12:04

meatzor,
Разницу-то хоть чуствуешь между помогите и сделайте за меня?
Начинай - поможем.
Свои наработки покажи.

@tarakano · 08.04.2012, 12:22

1.

Visual Basic
1
2
3
4
5
6
7
8
9
Option Explicit
Dim i As Integer
Dim n As String
Private Sub Command1_Click()
Cls
n = InputBox("Íàçâàíèå ãîðîäà")
i = InputBox("Ñêîëüêî ëåò ãîðîäó")
Print "Ïîçäðàâëÿåì æèòåëåé ãîðîäà"; n; "ñ"; i; "ëåòèåì!!!"
End Sub

@tarakano · 08.04.2012, 12:31

2.

Visual Basic
1
2
3
4
5
6
7
8
9
10
Option Explicit
Dim a As Integer, b As Integer
Private Sub Command1_Click()
Label1.Caption = ""
a = InputBox("Первое число")
b = InputBox("Второе число")
If a > b Then Label1.Caption = Label1.Caption & Str(a) & ">" & Str(b)
 If a < b Then Label1.Caption = Label1.Caption & Str(a) & "<" & Str(b)
 If a = b Then Label1.Caption = Label1.Caption & Str(a) & "=" & Str(b)
End Sub

@tarakano · 08.04.2012, 12:36

5.

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
Option Explicit
Dim i As Integer, n As Integer, s As Integer
 
Private Sub Command1_Click()
s = 1
n = InputBox("Ôàêòàðèàë êàêîãî ÷èñëà ñ÷èòàåì?")
For i = 1 To n
s = s * i
Next i
Print "Ôàêòîðèàë" & Str(n) & "ðàâåí" & Str(s)
End Sub

@tarakano · 08.04.2012, 12:39

а в 4 задании y=чему? а то у тебя непонятно написано

@Alex77755 · 08.04.2012, 13:24

Сообщение от tarakano

а в 4 задании y=чему?

5++
Я бы так не смог пошутить!

@meatzor · 08.04.2012, 13:34 **[ТС]**

Сообщение от tarakano

а в 4 задании y=чему? а то у тебя непонятно написано

y=x2+b

Новые блоги и статьи Все статьи Все блоги /
Идея фильтра интернета (сервер = слой+фильтр). Hrethgir 31.03.2026 Суть идеи заключается в том, чтобы запустить свой сервер, о чём я если честно мечтал давно и давно приобрёл книгу как это сделать. Но не было причин его запускать. Очумелые учёные напечатали на. . .	Модель здравосоХранения 6. ESG-повестка и устойчивое развитие; углублённый анализ кадрового бренда anaschu 31.03.2026 В прикрепленном документе раздумья о том, как можно поменять модель в будущем	10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .
Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .	Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .

@meatzor 0 / 0 / 0 Регистрация: 08.04.2012 Сообщений: 4

	Выведите на экран значения чисел и определите большее и меньшее из них 08.04.2012, 00:48. Показов 3116. Ответов 7 Метки нет (Все метки) 1. Напишите программу, в которой бы пользователь мог ввести название города-юбиляра (N) и количество исполнившихся ему лет (Х). После нажатия кнопки ОК должно выйти окно с поздравлением: “Поздравляем жителей города N с Х-летием!!!”. 2. Ввести два числа. Выведите на экран их значения и определите большее и меньшее из них. 3. Напишите программу, которая по знаку математической операции выводит её название. (+ - сложение, * - умножение) 4. Вычислите множество значений функции y=x 52 0+b для аргумента х, изменяющегося от -10 до 10 с шагом 2, при b=5. 5. Вычислите значение n! для n=7. Ответ: 5040. Пожалуйста помогите хоть какие-нибудь из них написать. Заранее спасибо! 0

@Alex77755 11525 / 3812 / 683 Регистрация: 13.02.2009 Сообщений: 11,229
	08.04.2012, 12:04
	meatzor, Разницу-то хоть чуствуешь между помогите и сделайте за меня? Начинай - поможем. Свои наработки покажи. 0

@tarakano 34 / 26 / 0 Регистрация: 24.12.2010 Сообщений: 165
	08.04.2012, 12:39
	а в 4 задании y=чему? а то у тебя непонятно написано 0