Даны два натуральных числа m и n. Проверить, есть ли в записи числа m цифры, одинаковые с цифрами в записи числа n.
НА БЕЙСИКЕ
Даны два натуральных числа m и n. Проверить, есть ли в записи числа m цифры, одинаковые с цифрами в записи числа n.
НА БЕЙСИКЕ
на паскале скринн всего экрана
Задача А. С клавиатуры вводится натуральное число. Напишите программу, которая выводит “ДА”, если число четное, иначе — “НЕТ”.
Задача Б. В компьютер вводятся два числа. Если первое больше второго, то вычислить их сумму, иначе — произведение. После этого компьютер должен напечатать результат
Дано натуральное число n (n ≤ 9999). Выяснить, разные ли все четыре цифры этого числа (с учетом четырех цифр) Например ,в числе 5623 все цыфры разные ,а в числе 0012 -нет .пайтон программирование
Помогите пожалуйста. В программе паскаль, написать программу, которая сравнивает два действительных числа x, y. Если x больше чем y находит их сумму, а произведение если это не так.
Спасибо
Ввести с клавиатуры два натуральных числа и найти их НОД с помощью модифицированного алгоритма Евклида. Заполните таблицу:
Если можно, то плиз только ответы.
Даны натуральные числа a и b если их сумма чётное, то вывести на экран сумму этих чисел в противном случаи вывести 5 , 13
Питон
Напишите программу, которая определяет, верно ли, что введённое число содержит две одинаковых цифры, стоящие рядом (как, например, 221).
Входные данные
Входная строка содержит одно натуральное число.
Выходные данные
Программа должна вывести слово ‘YES’, если в числе есть две одинаковые цифры, стоящие рядом, и слово ‘NO’, если такой пары цифр нет.
Примеры
входные данные
5221
выходные данные
YES
входные данные
1232
выходные данные
NO
1.Найти меньшее min из двух целых чисел x и y
2.Даны натуральные числа a и b. Определить тип обыкновенной дроби a/b (правильная или неправильная), ответ записать в переменную d.
3.Дано целое число х. Если оно двузначное, то в переменную s записать слово “YES”, иначе – слово “NO”.
Замечание: в программах обязательно должны быть блок ввода и блок вывода.
Знакомство с IDE
Установи соответствие между арифметическими операциями»и результатом их применения к
Числам.
6**2
1
174
И 36
17%4
Назад
Кроверить
написать программу ввести .натуральное число и найти сумму его цифр
Число 3322n записано в системе счисления с основанием n (n > 1). Определите наименьшее возможное значение n. Для этого значения n в ответе запишите представление данного числа в десятичной системе счисления.
С объяснением, пожалуйста
Помогите решить. Надо написать на языке паскаль 7 вариант
Скільки разів буде виконано цикл
for x in range (5, -2, -2) ?
1) 7
2) 4
3) 5
4) жодного разу
Артур составляет 5-буквенные коды из букв А, П, О, Р, Т. Каждую букву нужно использовать ровно один раз, при этом нельзя ставить рядом две гласные. Сколько различных кодов может составить Артур?
Напишите с объяснением, пожалуйста
Решите задачу.
У исполнителя имеется две команды:
1. Прибавить 3
2. Отнять 1
Какое минимальное количество команд необходимо выполнить исполнителю для получения числа 9 из числа 2 Выберите один ответ:
a.5
b.2
c.7
d.3
Write a program that lets you know if you can have a key or not, based on your role at the school.
First ask for the user’s role at the school. They can be a student, administrator, or a teacher. (And remember that capitalization is important! ‘Student’ is not the same as ‘student’.)
Example 1: Administrator or Teacher
For example, if this was the input:
Are you an administrator, teacher, or student?: teacher
This should be the output:
Administrators and teachers get keys!
Example 2: Student
And if this was the input:
Are you an administrator, teacher, or student?: student
This should be the output:
Students do not get keys!
(Note: You should also be able to handle a situation where the user enters a value other than administrator, teacher or student and tell them they must be one of the three choices!)
Example 3: Other
If they input anything else:
Are you an administrator, teacher, or student?: secretary
This should be the output:
You can only be an administrator, teacher, or student!
РЕШИТЕ ЗАДАЧУ ПО ИНФОРМАТИКЕ В excel
Во время каникул Незнайка решил поработать продавцом газет и проработал целую неделю. За каждый проданный экземпляр газеты «Известия Цветочного города» он получал 10 монет. За каждый экземпляр «Технической газеты Винтика и Шпунтика» — 7 монет. За каждый экземпляр «Медицинских новостей доктора Медуницы» — 8 монет. В понедельник он продал 8 экземпляров Известий, 7 экземпляров Технической газеты и 5 экземпляров Медицинских новостей. Во вторник было продано 13 экземпляров Известий, 4 экземпляра Технической газеты и 8 экземпляров Новостей. В среду — 10 Известий, 10 Технических и 12 Новостей. В четверг — 8 Известий, 7 Технических газет и 15 Медицинских новостей. В пятницу — 10 штук Известий, 5 штук Технических и 8 штук Медицинских. В субботу — 9 Известий, 13 Технических газет и 8 Медицинских новостей. В воскресенье — 5 экземпляров Известий, 6 экземпляров Технической и 9 экземпляров Медицинской.
Сколько экземпляров каждой газеты Незнайка продавал за каждый день недели и сколько — за всю неделю; сколько денег он зарабатывал за каждый день недели и сколько — за всю неделю; сколько денег он получал за продажу каждой газеты за всю неделю?
КАКУЮ ФОРМУЛУ НАДО ПИСАТЬ В ПУСТЫХ ЯЧЕЙКАХ? (Знаю, что должна быть формула Сумма произведений) ПИШИТЕ ФОРМУЛУ ПОДРОБНО, ПОЖАЛУЙСТА
Пацаны срочно будет ли звуковой сигнал загрузки биос без видеоядра?
Що таке «висловлювання» в інформатиці?a.
Це думка, яку може висловлювати людина
b.
Це речення, яке містить твердження про певний об’єкт або про зв’язки між об’єктами
c.
Фрагмент алгоритму, який містить послідовність команд, яка виконуватиметься вказану кількість разів
d.
Алгоритм, який обирає сценарій роботи в залежності від умови
Сместиться на (—12,16) Повтори 4 раза Сместиться на (а, Ъ) Сместиться на (—3,1) Сместиться на (2, —2) конец
Дан целочисленный массив . Найти индекс максимального элемента.
Sub Same()
Dim n, m, i As Integer, j As Integer, sStr As String, bFlag As Boolean
n = InputBox(«n»)
m = InputBox(«m»)
For i = 1 To Len(n)
For j = 1 To Len(m)
If Mid(n, i, 1) = Mid(m, j, 1) Then
bFlag = True
Exit For
End If
Next
If bFlag Then Exit For
Next
MsgBox sStr
End Sub