Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.52/79: Рейтинг темы: голосов - 79, средняя оценка - 4.52
 Аватар для Rphoenix
-2 / 5 / 0
Регистрация: 07.03.2014
Сообщений: 254

Проверить Блок-схему

20.07.2014, 03:50. Показов 14762. Ответов 4

Студворк — интернет-сервис помощи студентам
Одноклеточная амёба каждые три часа делится на 2 клетки. Составьте алгоритм вычисления времени, через которое будет X амёб.



k:=k+1 же должно быть, нет?
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
20.07.2014, 03:50
Ответы с готовыми решениями:

Проверить вычисление выражения и составить блок-схему по коду
схема задания на картинке проверьте пожалуйста правильно или нет решено задание и кому не трудно помогите с блок схемой=) Program lr; ...

проверить блок-схему
есть сомнения по этой блок-схеме. Подскажите, что здесь не правильно? ЗАДАЧА: Дана последовательность, содержащая от 2 до 50 слов, в...

Проверить блок-схему
var a, n: integer; r: real; i: byte; begin write ('Число: '); readln (a); write ('Степень: ');...

4
Почетный модератор
 Аватар для Puporev
64314 / 47610 / 32743
Регистрация: 18.05.2008
Сообщений: 115,168
20.07.2014, 07:52
Лучший ответ Сообщение было отмечено Rphoenix как решение

Решение

Если через каждые 3 часа, ко k:=k+3
1
 Аватар для Krasme
7244 / 5097 / 2151
Регистрация: 02.02.2014
Сообщений: 13,455
20.07.2014, 08:23
Лучший ответ Сообщение было отмечено Rphoenix как решение

Решение

Rphoenix, еще надо задать Х.
и корректнее условие https://www.cyberforum.ru/cgi-bin/latex.cgi?S\leq X
1
 Аватар для Rphoenix
-2 / 5 / 0
Регистрация: 07.03.2014
Сообщений: 254
20.07.2014, 17:54  [ТС]
Да-да, я имел в виду k:=k+3, просто в учебнике, значит, опечатка. Вот так и я написал. Всем спасибо.
0
Модератор
10411 / 5698 / 3401
Регистрация: 17.08.2012
Сообщений: 17,351
21.07.2014, 15:21
Я, конечно же, понимаю, что задачка, скорее всего, на циклы, но, тем не менее, замечу, что циклов никаких здесь не требуется, так как описанный процесс деления амёбы есть геометрическая прогрессия, первый член которой b1=1, знаменатель прогрессии q=2, фактически требуется определить, сумма скольких членов прогрессии превысит заданную. Преступим.

При q≠1 сумма первых n членов геометрической прогрессии определяется так:

https://www.cyberforum.ru/cgi-bin/latex.cgi?S=\frac{b_1(q^n-1)}{q-1}

Найдём n.

https://www.cyberforum.ru/cgi-bin/latex.cgi?q^n=\frac{S(q-1)}{b_1}+1\ \Rightarrow \ n=\log_q\left( \frac{S(q-1)}{b_1}+1\right)=\log_2\left( \frac{S(2-1)}{1}+1\right)=\log_2(S+1)

это найдено количество циклов деления амёбы. Осталось результат умножить на 3 и взять от этого дела целую часть, ну и, так как в паскале нет логарифма по основанию 2, привести основание к основанию натурального логарифма:

https://www.cyberforum.ru/cgi-bin/latex.cgi?n=\lfloor \frac{3\cdot \ln(S+1)}{\ln(2)}\rfloor

Блок-схема:

1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
21.07.2014, 15:21
Помогаю со студенческими работами здесь

Проверить блок-схему.
program file_1; uses crt; Label m1; var n:integer; st1,st2:string; F:text; procedure vvod; begin assign(F,'rez.txt');

Проверить блок-схему и подсказать с рандомом
program good_day; var day:array of integer; bg:boolean; i,a,yn,sr: integer; sr_temp:real; begin a:=0; randomize; for i:=1 to 31...

Проверить Правильно ли я сделал блок схему или нет
блок схема во вложении ато что то есть сомнения по поводу правильности код программы uses crt; var o,r,i,n,j,z,x:integer; ...

блок схему
program bbs; uses crt,graphABC; //процедура поворота точки относительно цетра вращенмя procedure Vrash(a:real;var...

блок схему
program Project2; {$APPTYPE CONSOLE} uses SysUtils; var a: array of integer; i,j:integer;


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

Или воспользуйтесь поиском по форуму:
5
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru