Информатика | 5 - 9 классы
Ввести число.
Если оно неотрицательно, вычесть из него 50, в противном случае прибавить к нему 100.
1) дано целое число, если оно положительное то прибавить к нему 1, а если в противном случаи, то не изменять и написать результат 2) дано число от 1 до 7(ввести) В зависимости от значений напичатать д?
1) дано целое число, если оно положительное то прибавить к нему 1, а если в противном случаи, то не изменять и написать результат 2) дано число от 1 до 7(ввести) В зависимости от значений напичатать дни недели пониднльник - 1 и т.
Д.
№ 5 Ввести число?
№ 5 Ввести число.
Если его модуль больше 7, уменьшить число в 1, 5 раза, в противном случае увеличить в 7 раз.
№ 6 Ввести число.
Если оно делится на 7 без остатка, то вывести на экран "ДЕЛИТСЯ", в противном случае вывести на экран " НЕ ДЕЛИТСЯ".
№ 7 Ввести 2 номера квартир.
Программа должна проверить, есть ли среди них номер вашей квартиры.
Дано целое число?
Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; в противном случае не изменятьего.
Вывести полученное число.
Дано целое число?
Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; в противном случае не изменять его .
Вывести полученное число.
Задачи практикума по языку Паскаль?
Задачи практикума по языку Паскаль.
Условный оператор.
Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; в противном случае вычесть из него 2.
Вывести полученное число.
Входные данные : ввести целое число X ( - 1000< ; = X < ; = 1000).
Выходные данные : вывести полученное число Х.
Дано целое число?
Дано целое число.
Если оно является положительным, то прибавить к нему 1, в противоположном случае вычесть из него 2.
Вывести полученное число.
Ребят задача на языке Pascal?
Ребят задача на языке Pascal.
Дано целое число, если оно двузначное, то умножить на 2, в противном случае вычесть 10.
Напишите сколько сможете программ для решения вот таких задач : If1?
Напишите сколько сможете программ для решения вот таких задач : If1.
Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; в противном случае не изменять его.
Вывести полученное число.
If2. Дано целое число.
Если оно является положительным, то прибавить к нему1 ; в противном случае вычесть из него2.
Вывести полученное число.
If3. Дано целое число.
Если оно является положительным, то прибавить к нему 1 ; если отрицательным, то вычесть из него 2 ; если нулевым, то заменить его на 10.
Вывести полученное число.
Помогите очень надо.
Напишите на языке C + + ?
Напишите на языке C + + !
1) Ввести число.
Если оно неотрицательно (больше 0), вычесть из него 10, иначе – прибавить к нему 10 2) Ввести 2 числа.
Если их произведение отрицательно, умножить его на - 2 и вывести на экран, иначе – увеличить его в 3 раза и вывести на экран 3) Ввести два числа.
Вычесть из большего меньшее 4) Ввести рост человека.
Вывести на экран “высокий”, если его рост превышает 180 см, “нормальный” и “низкий”.
1) Ввести число?
1) Ввести число.
Если оно неотрицательно (больше 0), вычесть из него 10, иначе – прибавить к нему 10 2) Ввести 2 числа.
Если их произведение отрицательно, умножить его на - 2 и вывести на экран, иначе – увеличить его в 3 раза и вывести на экран 3) Ввести два числа.
Вычесть из большего меньшее 4) Ввести рост человека.
Вывести на экран “высокий”, если его рост превышает 180 см, “нормальный” и “низкий”.
Вы перешли к вопросу Ввести число?. Он относится к категории Информатика, для 5 - 9 классов. Здесь размещен ответ по заданным параметрам. Если этот вариант ответа не полностью вас удовлетворяет, то с помощью автоматического умного поиска можно найти другие вопросы по этой же теме, в категории Информатика. В случае если ответы на похожие вопросы не раскрывают в полном объеме необходимую информацию, то воспользуйтесь кнопкой в верхней части сайта и сформулируйте свой вопрос иначе. Также на этой странице вы сможете ознакомиться с вариантами ответов пользователей.
Microsoft Visual Basic 2010(более ранние тоже прокатят)
Dim I As Single Private Sub Form1_Load(ByVal sender As System.
Object, ByVal e As System.
EventArgs) Handles MyBase.
Load I = Val(InputBox("Введите число")) If I > ; = 0 Then I = I - 50 Else I = I + 100 End If MsgBox(I) End Sub
Просто на Basic
Dim I As Single
Input(I) If I > ; = 0 Then I = I - 50 Else I = I + 100 End If
Print I
End.