Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.58/64: Рейтинг темы: голосов - 64, средняя оценка - 4.58
4 / 3 / 2
Регистрация: 11.08.2016
Сообщений: 352

Ошибка в составлении задачи

30.10.2017, 18:08. Показов 12290. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Здравствуйте!
Очень нужна Ваша помощь, которая касается одной задачи, вот её условие
4.К старушке на обед ходят кошки. Каждую неделю две кошки приводят свою подружку. В доме у старушки 100 мисок. Через какое время появятся лишние кошки, и сколько кошек при этом останется голодными
Вот то что у меня получилось:
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
uses crt;
const r=100;
var t,l,n,k:integer;
begin
   writeln('Введите количество кошек на текущий момент: ');
   readln(k);
   t:=1;
   while (k<r) do begin
      k:=k+1;
      l:=k+1;
      t:=l*7;//лишние кошки (время) через неделю 
   end;
   writeln('Время:',t);
   writeln('Голодные кошки:',l);
end.
С циклом while у меня плохо. Помогите, пожалуйста!
Заранее спасибо!
0
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
30.10.2017, 18:08
Ответы с готовыми решениями:

Существует ли решение задачи о составлении расписания?
Здравствуйте! На форуме, в работе которого я принимаю участие, встретился такой вопрос: &quot;Дано: 64 человека. 8 столов по 8 мест. 9...

Задачи о составлении слов и нахождении вероятности
Помогите, пожалуйста, решить эти две задачи:

Помогите найти ошибку в составлении задачи на одномерный массив
Дан массив, содержащий 15 элементов, получить новый, каждый элемент которого - разность квадрата и основания соответствующего элемента...

1
Aimez-vous les baguettes?
193 / 26 / 27
Регистрация: 25.10.2017
Сообщений: 165
30.10.2017, 19:43
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
begin
Var cats, pairs, weeks: integer;
cats:=2;
weeks:=0;
 
while cats <= 100 do begin
pairs:=cats div 2;
cats += pairs;
inc(weeks);
end;
 
writelnFormat('{0} существо останется голодным. Появятся лишние кошки через {1} дней', cats - 100 ,weeks * 7);
 
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
30.10.2017, 19:43
Помогаю со студенческими работами здесь

Ошибка при составлении запроса
Хотел написать запрос на кнопку ,запускаю а оно выдает ошибку

ошибка при составлении функции
Я пытаюсь создать программу, при помощи функции выделяющую из двумерного массива одномерный, который будет состоять из элементов старого,...

Ошибка при составлении запроса
Есть таблица с тремя столбцами (id, timestamp, config). Первые два не интересны. Интересен третий config. Он имеет тип jsonb. Там лежит...

Ошибка в составлении метода для вектора
Есть задание Практика «Вектор» Создайте новый проект в Visual Studio. Выберите в качестве типа проекта Class Library. В этом проекте...

Ошибка при составлении программы по нахождения максимального элемента
Добрый вечер, форумчане! У меня есть несколько вопросов по поводу данной программы: Program Max; Const s=10; var a:array of...


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора
ФедосеевПавел 14.03.2026
Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .
делаю науч статью по влиянию грибов на сукцессию
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-код на мобильном. Вращайте камеру одним пальцем,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru