Блок-схемы

@slavic_force · Регистрация: 21.03.2015

Студворк — интернет-сервис помощи студентам

Напишите пожалуйста блок-схему к задаче :

Pascal
1
2
3
4
5
6
7
8
9
10
11
var s:string;
i,k:integer;
begin
readln(s);
for i:=1 to length(s) do
begin
k:=k+1; if s[i]=' ' then break;
end;
write('...',k-1);
readln
end.

@JokeR.BY · 23.03.2015, 22:10

хз как иначе, нежели вызов процедуры, сделать прерывание цикла. просто нужно не for, а while юзать.

@slavic_force · 24.03.2015, 06:39 **[ТС]**

Спасибо большое, здорово выручили.

Не по теме:

Помогите пожалуйста ещё с двумя последними задачами, мне необходимо показать алгоритм решения ( который я не понимаю).

Составить блок-схему к программе нахождения элемента матрицы
Составить блок-схему к программе нахождения элемента матрицы

@Cyborg Drone · 24.03.2015, 22:01

Не по теме:

slavic_force, на будущее:

Нажмите для прочтения информации о нарушении Вами правил форума

slavic_force, рекомендую Вам ознакомиться с правилами форума.

Одна тема - один вопрос, исключение для платных разделов.

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

Темы с вопросами были созданы, требовалось привести ссылки на темы, а не публиковать вопросы целиком.

Исправлено.

Пожалуйста, оформляйте Ваши темы согласно правил форума.

@Cyborg Drone · 24.03.2015, 22:42

Сообщение от JokeR.BY

хз как иначе

Иначе, к сожалению, применять рисовалку блок-схем по коду, в которой возможно подрихтовать результат.

@JokeR.BY · 24.03.2015, 23:32

Cyborg Drone, вообще я не из кода, а ручками блоки кидал.
P.S. по сути это слепленный вместе репит и фор. о чём я и говорил давеча.

@Cyborg Drone · 25.03.2015, 00:03

А, JokeR.BY, извини, понял. Разные у нас с Вами ключи на 17.

Сообщение от JokeR.BY

по сути это слепленный вместе репит и фор

По моим сведениям, не совсем так. Исторически это всё же сцепленные вместе "фор" и "иф зен гоуту", не к ночи помянут, поэтому бряк всё же логичнее не процедурой, а просто стрелкой изображать.

Не по теме:

Хотя... Насчёт гоуту... Если циклов как слоёв в луковице, так и сейчас приветствуется не бряк по условию в конце всякого цикла, а ифзенгоуту из всех циклов сразу...Ну, если это на самом деле необходимо.

@JokeR.BY · 25.03.2015, 00:25

Сообщение от Cyborg Drone

По моим сведениям, не совсем так.

и тем не менее, это как по схеме, так и логически (за "поведенчески" не скажу, не помню что во что компилится там уж) - это репит. просто вместо ручного инкремента тут фор.

Не по теме:

Break в принципе не очень активно использую. равно как и преждевременный выход из функции / метода / процедуры и тд. ибо точка выхода должна быть одна. во всяком случае учили так...

Добавлено через 2 минуты
хотя не до конца это репит. запутал меня малость автор...

@Cyborg Drone · 25.03.2015, 01:28

JokeR.BY, в данном случае да, фор можно заменить на рипит, с двойным условием выхода, да ещё и инкремент счётчика в тушку цикла запихать... Правда, это ещё вопрос, лучше ли это будет выглядеть, чем фор с бряком...

А в общем и целом - да ну, какой к лешему рипит... Это в конце тела цикла бряк - рипит, но тогда в начале тела цикла бряк - антивайл, а в середине тела цикла тогда уже и не знаю, что... Хотя, нет, знаю...

Не по теме:

А ещё я очень оператор континьё люблю, только на форуме его стараюсь не применять: студиозусы его не любят отчего-то...

@JokeR.BY · 25.03.2015, 02:07

Cyborg Drone, просто по хорошему нужно код было написать в таком виде (коль скоро цикл фор):

Pascal
1
2
3
for i:=1 to length(s) do
if s[i]=' ' then break;
+ проверка на i = length

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

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .
И ясному Солнцу zbw 12.02.2026 И ясному Солнцу, и светлой Луне. В мире покоя нет и люди не могут жить в тишине. А жить им немного лет.	«Знание-Сила» zbw 12.02.2026 «Знание-Сила» «Время-Деньги» «Деньги -Пуля»	SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .

@JokeR.BY CAPITAL OF ROCK! 1281 / 708 / 982 Регистрация: 03.03.2010 Сообщений: 2,286
	23.03.2015, 22:10
	Сообщение было отмечено slavic_force как решение Решение хз как иначе, нежели вызов процедуры, сделать прерывание цикла. просто нужно не for, а while юзать. Изображения 1

@slavic_force 0 / 0 / 1 Регистрация: 21.03.2015 Сообщений: 126
	24.03.2015, 06:39 [ТС]
	Спасибо большое, здорово выручили. Не по теме: Помогите пожалуйста ещё с двумя последними задачами, мне необходимо показать алгоритм решения ( который я не понимаю). Составить блок-схему к программе нахождения элемента матрицы Составить блок-схему к программе нахождения элемента матрицы 0

@Cyborg Drone
	24.03.2015, 22:01
	Не по теме: slavic_force, на будущее: Нажмите для прочтения информации о нарушении Вами правил форума slavic_force, рекомендую Вам ознакомиться с правилами форума. Одна тема - один вопрос, исключение для платных разделов. Для каждого отдельного вопроса в тематическом разделе требуется создавать отдельную тему. Если Вы в существующей теме желаете попросить кого-либо о помощи по какому-либо вопросу, требуется по этому вопросу создать отдельную тему, а в существующей теме в оффтопе (то есть, не по теме) изложить Вашу просьбу с указанием ссылки на вновь созданную тему. Темы с вопросами были созданы, требовалось привести ссылки на темы, а не публиковать вопросы целиком. Исправлено. Пожалуйста, оформляйте Ваши темы согласно правил форума. 0

@JokeR.BY CAPITAL OF ROCK! 1281 / 708 / 982 Регистрация: 03.03.2010 Сообщений: 2,286
	24.03.2015, 23:32
	Cyborg Drone, вообще я не из кода, а ручками блоки кидал. P.S. по сути это слепленный вместе репит и фор. о чём я и говорил давеча. 0

@Cyborg Drone Модератор 10429 / 5717 / 3404 Регистрация: 17.08.2012 Сообщений: 17,385
	25.03.2015, 01:28
	JokeR.BY, в данном случае да, фор можно заменить на рипит, с двойным условием выхода, да ещё и инкремент счётчика в тушку цикла запихать... Правда, это ещё вопрос, лучше ли это будет выглядеть, чем фор с бряком... А в общем и целом - да ну, какой к лешему рипит... Это в конце тела цикла бряк - рипит, но тогда в начале тела цикла бряк - антивайл, а в середине тела цикла тогда уже и не знаю, что... Хотя, нет, знаю... Не по теме: А ещё я очень оператор континьё люблю, только на форуме его стараюсь не применять: студиозусы его не любят отчего-то... 0

Блок-схемы

Решение