Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 03.01.2019
Сообщений: 28

Определить, в какой день студент решит 30 задач

03.01.2019, 17:50. Показов 623. Ответов 10
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задача на цикл с параметром.

Студент, решая задачи по программированию, в первый день решил 5 задач. Каждый следующий день он решал на 20% больше задач по сравнению с предыдущим днём (количество решенных за день задач округлять до ближайшего целого). Определить, в какой день он решит 30 задач.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
03.01.2019, 17:50
Ответы с готовыми решениями:

Определить вероятность того, что наудачу выбранный студент решит задачу
В студенческой группе 25 человек. Из них 5 человек сдали экзамен по высшей математике на "отлично", 12 на "хорошо" и 8...

Определить, на какой день недели приходится k-й день невисокосного года
Пусть k – целое от 1 до 365. Присвоить целой переменной n значение 1,2,…6 или 7 в зависимости от того, на какой день недели ( понедельник,...

Студент собрал X кг помидоров за день - определить его заработок
Ребята, пожалуйста помогите мне разобраться в написании программы: Студенты убирают урожай помидоров. При сборе до 50 кг в день...

10
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
03.01.2019, 21:30
может все-таки цикл с пост условием или пред условием?

Добавлено через 3 минуты
Pascal
1
2
3
4
5
6
7
8
9
10
var
  i,n:integer;
begin
  n:=5;
  for i:=2 to 1000 do begin
    n:=round(n+n*0.2);
    if n>=30 then break;
  end;
  writeln(i);
end.
0
0 / 0 / 0
Регистрация: 03.01.2019
Сообщений: 28
03.01.2019, 21:32  [ТС]
Вообще задача в этой теме находится
0
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
03.01.2019, 21:39
Вообще и ответ находится в этой теме
0
0 / 0 / 0
Регистрация: 03.01.2019
Сообщений: 28
03.01.2019, 22:01  [ТС]
Задача в теме цикл с параметром
0
0 / 0 / 0
Регистрация: 03.01.2019
Сообщений: 28
04.01.2019, 21:12  [ТС]
не работает
0
Модератор
10440 / 5729 / 3405
Регистрация: 17.08.2012
Сообщений: 17,438
05.01.2019, 01:19
Fedorfreezz, программа от Joy содержит цикл с параметром. Программа работает, и выдаёт ответ 12. Что не так?

Хотя... Догадываюсь, что не так. Вы не указали среду программирования. Не во всякой среде программирования параметр цикла остаётся валидным вне тела цикла. Также не во всякой среде программирования возможно будет увидеть результат работы программы без принятия некоторых дополнительных мер ввиду того, что программа закроется сразу после выполнения, и всё, что Вы увидите - это мелькнувшее окно консоли.

Для любого диалекта паскаля:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  i, n, t:integer;
 
begin
  n := 5;
  for i := 2 to 1000 do begin
    n := round(n + n * 0.2);
    t := i;
    if n >= 30 then break
  end;
  writeln(t);
  readln
end.
0
0 / 0 / 0
Регистрация: 03.01.2019
Сообщений: 28
05.01.2019, 01:37  [ТС]
Там 5 должно получится
0
Модератор
10440 / 5729 / 3405
Регистрация: 17.08.2012
Сообщений: 17,438
05.01.2019, 03:10
Ох, да, не заметил алгоритмическую ошибку... Вот так будет правильно:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var
  i, n, s, t:integer;
 
begin
  n := 5;
  s := n;
  for i := 2 to 1000 do
    begin
      n := round(1.2 * n);
      s := s + n;
      t := i;
      if s >= 30 then break
    end;
  writeln(t);
  readln
end.
1
Эксперт Pascal/Delphi
2388 / 1300 / 1492
Регистрация: 29.08.2014
Сообщений: 4,665
05.01.2019, 04:24
Цитата Сообщение от Fedorfreezz Посмотреть сообщение
Определить, в какой день он решит 30 задач
я понял так, что он ежедневно решал задачи и на 12 день дошел до решения 30 задач в день.
0
Модератор
10440 / 5729 / 3405
Регистрация: 17.08.2012
Сообщений: 17,438
05.01.2019, 04:31
Хм... Joy, действительно... Можно и так понять.

Fedorfreezz, получается, условие Вашей задачи содержит разночтение.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
05.01.2019, 04:31
Помогаю со студенческими работами здесь

Определить, на какой день недели проходится k-й день невисокосного года в котором 1 января - понедельник
вводится k-й день года (1<=k<=365).Определить и вывести,на какой день недели проходится k-й день невисокосного года в котором 1...

Определить, на какой неделе и в какой день недели состоится урок
В первом полугодии учебного года занятия проходят с 1 по 8 и с 10 по 17 неделю (9 неделя – каникулы). В расписании одного из классов 5 дней...

Известна дата и день недели некоторого события. Определить на какой день недели приходится начало года
Известна дата и день недели некоторого события. Определить на какой день недели приходится начало года. Использовать множества и не...

Известна дата и день недели некоторого события. Определить, на какой день недели приходится начало года
Известна дата и день недели некоторого события. Определить, на какой день недели приходится начало года.

Определить, какой будет день недели через N дней, если сегодня день недели S
Вычисление с днями недели. Обозначим дни как 0 = воскресенье, 1 = понедельник, ..., 6 = суббота. Определите предикат p( +S, +N, -R),...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
11
Ответ Создать тему
Новые блоги и статьи
делаю науч статью по влиянию грибов на сукцессию
anaschu 13.03.2026
прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru