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

Дан целочисленный массив из 30 элементов. элементы массива могут принимать значе-ния от -20 до 20 — сведения о температуре за каждый день ноября. опишите на языке или на одном из языков программирования алгоритм, который находит и выводит максимальную температуру среди дней, когда были заморозки (то есть температура опускалась ниже нуля). гарантируется, что хотя бы в один день ноября была отрицательная температура.

исходные данные объявлены так, как показано ниже. запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.
n=30

dim a(n) as integer

dim i, j, max as

integer

for i = 1 to n

input a(i)

next i



end

Показать ответ
Ответ:
akopovaliza2003
akopovaliza2003
22.08.2021 04:20

ответ:  Python  

nk = input().split()

N = int(nk[0])

K = int(nk[1])

count = 0

prev = set('a')

for x in range(N):    

   s = input().split()

   set_s = set(s[1:])

   if set_s.issuperset(prev) == False:  

       count += 1

   prev = set_s

print(count)

Объяснение:

Решал, подразумевая, что одно и то же K не может повторяться несколько раз на одной строке.

Псевдокод алгоритма:

1.  Получаем N

2. Получаем K

3. Создаем переменную count для подсчета операций

4. Создаем множество prev для сохранения каждого предыдущего множества

5. Прогоняем цикл N раз:

  6. Получаем список s от пользователя

  7. Получаем множество set_s из списка s

  8. Проверяем, если предыдущее множество prev не является подмножеством set_s:

     9. То к count прибавляем 1

  10. Присваиваем prev значение set_s

0,0(0 оценок)
Ответ:
KrasotkaSofia195
KrasotkaSofia195
12.12.2020 10:23

program CheckSum;

var

number1, number2, number3: longint;

function Check(n: longint): boolean;

var

sum: longint;

begin

sum := 0;

while n > 0 do

begin

sum := sum + n mod 10;

n := n div 10;

end;

Check := sum = 10;

end;

begin

writeln('Введите два числа через пробел:');

readln(number1, number2);

if number1 < 0 then

begin

write('Нужно ввести положительное число.');

end

else

begin

if Check(number1) then

begin

write('Да');

end

else

begin

write('Нет');

end;

end;

if number2 < 0 then

begin

write(' Нужно ввести положительное число.');

end

else

begin

if Check(number2) then

begin

write(' Да');

end

else

begin

write(' Нет');

end;

end;

writeln();

repeat

write('Введите число >= 0: ');

readln(number3);

if number3 < 0 then

begin

writeln('Нужно ввести положительное число.');

end;

until number3 >= 0;

if Check(number3) then

begin

writeln('Да');

end

else

begin

writeln('Нет');

end;

end.

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