В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Awzida
Awzida
20.01.2020 08:17 •  Информатика

Зробити Гру на JAVASCRIPT “Вгадай число” У вас є 2 поля, в які потрібно ввести верхній та нижні кордони. Тобто в межах яких чисел буде загадано число. Посля натискання кнопки “Почати” повинно з´явитися confirm повідомлення з текстом “Готові почати?”.
Якщо відповідь “true”, то треба сгенерувати рандомне число в заданих рамках та показати prompt з текстом "Яке число вiд " + minNumber + " до " + maxNumber + " я загадав?", де minNumber і maxNumber - числа з наших полiв. Потім потрібно ввести число в promt вікно, а наша програма має порівняти рандомне число з тим, що ми ввели в promt. Якщо наше число більше за рандомне число, то показати повідомлення “Трохи більше”, якщо менше, то “Трохи менше”, якщо правильно, то “Вірно”.
Якщо на питання “Готові почати?” відповідь false, то показати повідомлення “До наступного разу!”

Показать ответ
Ответ:
Жикабай
Жикабай
26.12.2021 04:46
1. Если число в двоичной системе заканчивается на 00, значит оно кратно 4-м в десятичной системе. То есть нужно определить, сколько существует двузначных чисел, которые в квадрате кратны 4-м.10*10
Квадрат числа будет кратен четырем в том случае, если это число чётное, то есть ответом будет кол-во четных двузначных чисел, а это 45.

2. 3 бита это 2^3 = 1 из 8 вариантов. Значит четверки - это 1/8 от всех оценок, 64/8=8 четверок

3. Всего существует 5 четных цифр (включая 0). Из них можно составить 5^4 = 625 различных четырёхзначных комбинаций.
0,0(0 оценок)
Ответ:
новенькая10
новенькая10
20.09.2020 00:39
Рекурсивный подход.(Символы тоже удаляет)
function grad(s:string):string;
var
i:byte;
detect:boolean;
begin
while i < length(s) - 2 do
begin
inc(i);
if (s[i] = s[i+1]) and (s[i] = s[i+2]) then {проверка последовательности из 3 елементов}
begin
delete(s,i,3); {если да - удаляем их}
detect:=True; {логическая переменная регистрирует изменение строки}
end;end;
if detect = True then
s:=grad(s); {если строку изменили , проверяем не появились ли там еще последовальности}
grad:=s; 
end;

var
s:string;
begin
readln(s);
writeln(grad(s));
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота