М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
tanyagrygorieva
tanyagrygorieva
17.06.2021 11:06 •  Информатика

Винни-пуху прислали посылку – k литров мёда. сначала он попытался разлить его в бочонки по 2 литра, но вот - 1 литр остался. потом попытался разлить в бочонки по 3 литра, и опять осталось 2 литра. и так далее, пока он не разлил мёд в бочонки по n литров, и у него осталось n-1 литров мёда. определите, какое минимальное количество мёда могли прислать винни. формат входных данных: строка, содержащая целое число n (2≤n≤19). формат выходных данных: вывести требуемое число k.

👇
Ответ:
neshm08meshca
neshm08meshca
17.06.2021
Var n,k,i:integer; f:boolean;
begin
readln(n);
k:=1;
f:=false;
while not f do
 begin
 k:=k+1;
 f:=true;
 for i:=2 to n do
  f:=f and (k mod i=i-1);
 end;
writeln(k);
end.

Пример (для 19 долго считает, можно оптимизировать, если нужно):
19
232792559
4,4(78 оценок)
Открыть все ответы
Ответ:
romayakovlev
romayakovlev
17.06.2021
Var
  A: array [1..120] of real;
  i, res: integer;

begin
  randomize();
  res := 0;
 
  for i := 1 to 120 do
  begin
    A[i] := random(101);
    writeln('A[', i, '] => ', A[i]);
  end;
  writeln();
 
  for i := 1 to 120 do
    if abs(A[i]) > 17 then
      inc(res);
 
  writeln(res);
end.



var
  C: array [1..20] of integer;
  i, res: integer;

begin
  randomize();
  res := 0;
 
  for i := 1 to 20 do
  begin
    C[i] := random(101);
    writeln('C[', i, '] => ', C[i]);
  end;
  writeln();
 
  for i := 1 to 20 do
    if C[i] mod 2 = 1 then
      C[i] := -1 * C[i];
 
  writeln('New array:');
  for i := 1 to 20 do
  begin
    writeln('C[', i, '] => ', C[i]);
  end;
end.
4,5(64 оценок)
Ответ:
KINGMe
KINGMe
17.06.2021
Первый вопрос: "Эта монета настоящая?" Второй вопрос: "Твой сосед - хитрец?" 
И только после второго ответа начинаем мыслить. 
- Если на второй вопрос ответ "да", то ответчик не лжец (потому, что тогда ответ правдив). Значит, или он хитрец, который соврал отвечая на второй вопрос, или он правдивец. В обоих случаях, ответ на первый вопрос - правда. - Если на второй вопрос ответ "нет", то ответчик не правдивец (так как это была бы ложь). Значит, он или лжец или хитрец, ответивший правду. Значит, ответ на первый вопрос - ложь.- То есть, если ответ на второй вопрос "да", то монета настоящая, а если ответ "нет", то фальшивая.
4,7(41 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ