Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

Восстановить пароль
Повторная активизация e-mail


Донат для форума - использовать для поднятия настроения себе и модераторам

А ещё здесь можно купить рекламу за 25 тыс руб в месяц! ) пишите сюда - alarforum@yandex.ru

Ответ
 
Опции темы
Старый 28.07.2019, 13:10   #1
deinpavel
 
Регистрация: 25.07.2019
Сообщений: 5
Репутация: 10
Вопрос Построение блок схем из кода программы.

Подскажите плиз какую программу лучше юзать для преобразования кода в блок схему. Ток не сильно мудреную, чтоб код вставил а она тебе схему. Типа Avtoshema. Чтоб вот эту прогу могла расшифровать.

Код:
type

natural=0..maxint;

var

n,m,k,kol:integer;

function sumdig(a:natural):natural;

var

m1,b:natural;

begin

m1:=0;

repeat

b:=a mod 10;

m1:=m1+b;

a:=a div 10;

sumdig:=m1;

until a=0;

end;

begin

repeat

write('Введите число N=');

readln(n);

write('Введите число M=');

readln(m);

kol:=0;

for k:=1 to n-1 do

if sumdig(k)=sumdig(m) {вариант sumdig(k)=m} then

begin

kol:=kol+1;

write(k);

writeln;

end;

write('Количество =',kol);

writeln;

until false;

end.
А то ее в Автосхему засовываю а она ошибку выдает, чет там аксес виолатион эт адрес и бла, бла.
deinpavel вне форума   Ответить с цитированием
Старый 28.07.2019, 14:18   #2
Desc
Developer
ФорумчанинФорумчанин
 
Аватар для Desc
 
Регистрация: 21.11.2007
Адрес: Ukraine
Сообщений: 233
Репутация: 105
По умолчанию

Ссылка на Автозарисовщик блок-схем:
https://almiur.ru/show_prog_9.html

P.S.
Только логичнее вначале блок-схему составить, а уж по ней затем писать код.
__________________
Корректно сформулировал вопрос - приблизился к решению
Desc вне форума   Ответить с цитированием
Старый 28.07.2019, 14:33   #3
p51x
Профессионал
 
Регистрация: 15.02.2010
Сообщений: 14,917
Репутация: 2668
По умолчанию

Цитата:
Сообщение от Desc Посмотреть сообщение
Только логичнее вначале блок-схему составить, а уж по ней затем писать код.
Шутите? Логичнее нагуглить код под дз, а потом еще и блок-схему из него получить прогой.
__________________
Запомните раз и навсегда: помочь != "решите за меня"!
p51x вне форума   Ответить с цитированием
Старый 28.07.2019, 14:50   #4
digitalis
Профессионал
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Адрес: Минск
Сообщений: 1,797
Репутация: 578
По умолчанию

... и получить зачет/курсач, не включая голову.
digitalis вне форума   Ответить с цитированием
Старый 28.07.2019, 18:12   #5
deinpavel
 
Регистрация: 25.07.2019
Сообщений: 5
Репутация: 10
По умолчанию

Какие все остроумные. Вы поди наверное счетами еще пользуетесь. Мол зачем калькулятор, он же считает без включения головы. Да и форумы вроде бы для того и придумали чтоб умники отвечали на вопросы нубов, не.

Последний раз редактировалось deinpavel; 28.07.2019 в 18:18.
deinpavel вне форума   Ответить с цитированием
Старый 28.07.2019, 18:19   #6
p51x
Профессионал
 
Регистрация: 15.02.2010
Сообщений: 14,917
Репутация: 2668
По умолчанию

Продолжайте строить идиота из себя. Вы ведь точно не понимаете разнициы между заучиванием таблицы умножения и подсчетам на калькуляторе отчетности...
__________________
Запомните раз и навсегда: помочь != "решите за меня"!
p51x вне форума   Ответить с цитированием
Старый 28.07.2019, 18:20   #7
Alex11223
Модератор
Заслуженный модератор
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,298
Репутация: 3739

icq: 512-765
skype: alexp.frl
По умолчанию

Цитата:
Сообщение от Desc Посмотреть сообщение
Только логичнее вначале блок-схему составить, а уж по ней затем писать код.
Ну тут скорее вопрос к преподам, которые заставляют рисовать блок-схемы на каждую строчку (если конечно автор правильно понял что от него хотят). Схемы обычно полезны для чего-то более глобального типа архитектуры или идеи алгоритма.

Хотя на самых начальных этапах изучения может быть и такое может принести пользу.
Alex11223 вне форума   Ответить с цитированием
Старый 28.07.2019, 18:32   #8
p51x
Профессионал
 
Регистрация: 15.02.2010
Сообщений: 14,917
Репутация: 2668
По умолчанию

Ну да, преподы виноваты, которые заставляют бедных студней их алгоритм описывать, а не просто скопипастить с инета... Не, это не студни просто тупы и ленивы, что не способны простейший алгоритм расписать...
__________________
Запомните раз и навсегда: помочь != "решите за меня"!
p51x вне форума   Ответить с цитированием
Старый 28.07.2019, 18:37   #9
Alex11223
Модератор
Заслуженный модератор
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,298
Репутация: 3739

icq: 512-765
skype: alexp.frl
По умолчанию

Да ленивых и тупых ничего не спасет всё равно )

Ну да, если тут просто основной алгоритм описать надо, то норм.
Я о том, что иногда бывает заставляют делать фигню типа блок-схем на код каждого обработчика события в GUI.
Alex11223 вне форума   Ответить с цитированием
Старый 29.07.2019, 03:08   #10
Black Fregat
Программист
Профессионал
 
Аватар для Black Fregat
 
Регистрация: 23.06.2009
Сообщений: 1,505
Репутация: 1038
По умолчанию

Цитата:
Сообщение от deinpavel Посмотреть сообщение
не
Не.
Black Fregat вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создать из блок-схем программы на языке программирования Паскаль Выручите пожалуйста сделайте дз svetamisha Помощь студентам 1 21.05.2017 23:56
Построение блок-схем(паскаль) xentai Помощь студентам 0 27.05.2012 20:25
Построение блок-схем по готовому коду. pashka_dos Помощь студентам 2 09.05.2012 15:36
Построение алгоритма из блок-схем emile8 Помощь студентам 0 04.12.2011 18:19
Построение блок-схем алгоритма PSych Помощь студентам 1 05.12.2010 16:30


06:51.


Powered by vBulletin® Version 3.8.11
Copyright ©2000 - 2019, Jelsoft Enterprises Ltd.