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

Задача J. Счастливое завершение Имя входного файла: стандартный ввод
Имя выходного файла: стандартный вывод
Ограничение по времени: 1 секунда
Ограничение по памяти: 256 мебибайт
Решением данной задачи является код программы, написанной на одном из предложенных языков программирования.
Гном, ставший горным королем, передал Барду обещанную часть всех сокровищ. Лучник поступил благородно, и распределил их между эльфами и жителями разрушенного Эсгарота.
Распределение произошло по следующему принципу:
N живых существ получат K сокровищ так, что у любых двух жителей количество сокровищ
будет отличаться не более, чем на 1.
Формат входных данных
В единственной строке вводятся два целых числа N и K (1 6 N, K 6 1000).
Формат выходных данных
Программа должна вывести количество живых существ, которым достанется сокровищ меньше,
чем некоторым из их товарищей.
Примеры
стандартный ввод стандартный вывод
7 30 5
7 28 0

Ответ:
Hah125
Hah125
19.04.2021 13:20

Program b;

var a: array [1..10000] of real;

x: real;

n, i, j, k, m, max: integer;

begin

read (n);

for i:= 1 to n do read ([i]);

max:=0;

for i:=1 to n do

for k:=-1 to 1 do

begin x:=a[i]+k;

m:=0;

for j:=1+0 n do

if (a[j]-1=x) or (a[j]+0=x) or (a[j]+1=x) then m:m+1;

if m>max then max:=m;

end;

write (max);

end.

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