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

НАПИСАТЬ ПРОГРАММУ НА ПИТОНЕ. Вариант 6 Текстовый файл состоит не более чем 10**6 символов арабских цифр (0, 1, ⋯, 9). Определите максимальное количество идущих подряд одинаковых цифр.
Вариант 7 Текстовый файл состоит не более чем 10**6символов арабских цифр (0, 1, ⋯, 9). Определите максимальное количество идущих подряд цифр, среди которых каждые две соседние различны.
Вариант 8 Текстовый файл состоит не более чем 10**6символов арабских цифр (0, 1, ⋯, 9). Определите максимальное количество идущих подряд цифр, расположенных строго в возрастающем порядке.

Показать ответ
Ответ:
Батюс
Батюс
29.07.2020 04:12
Где-то так:
import java.util.*;
import java.lang.*;
import java.io.*;

class Ideone
{
    public static void main (String[] args) throws java.lang.Exception
    {
        Scanner in = new Scanner(System.in);
        int[] arr = new int[29];
        int s1 = 0, s2 = 0;
            for(int i = 0; i < arr.length; i++){
                arr[i] = (int)(Math.random() * 3);
                if (arr[i] % 2 == 0) {
                    s1 += arr[i];
                }
                else if (arr[i] % 2 != 0) {
                    s2 += arr[i];
                }
            }
            if (s1 == s2) {
                System.out.println("Yes");
            } else {
                System.out.println("No");
            }
     }
}
0,0(0 оценок)
Ответ:
aktotyaubekerozp0uz
aktotyaubekerozp0uz
12.10.2020 17:28
// PascalABC.NET 3.3, сборка 1541 от 29.09.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=SeqRandomInteger(30,-50,50).Select(x->1.2*x).ToArray;
  a.Println;
  var m:=a.Average;
  var b:=a.Where(x->x<m).ToArray; b.Println
end.

Пример
27.6 -40.8 50.4 -14.4 -46.8 9.6 7.2 -36 -32.4 -60 -30 38.4 -2.4 -55.2 -43.2 -39.6 1.2 -52.8 -38.4 34.8 -45.6 -12 15.6 -55.2 4.8 13.2 -1.2 -40.8 -33.6 -19.2
-40.8 -46.8 -36 -32.4 -60 -30 -55.2 -43.2 -39.6 -52.8 -38.4 -45.6 -55.2 -40.8 -33.6 -19.2
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота