Программирование, т. 5.1.

так это же легко, лул

я даже не знаю что тут должно помочь такое решать, это элементарно, ну как минимум сам алгоритм прост до ужаса

1)

объявляешь переменную для суммы

делаешь цикл от а до b

if число mod n = 0 then добавляешь_это_число_в_сумму

(мод - остаток от деления если что)

и всё

2)

делаешь бесконечный цикл

вне цикла держишь переменные с текущим числом и множителем (начиная с 2)

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

если делится (число мод множитель = 0) - добавляешь число в список множителей, само число делишь на этот множитель

если не делится - увеличиваешь множитель на 1

когда число после последнего множителя достигнет 1 - конец

это примитивнейшие алгоритмы которые должны быть изи под силу человку который более-менее знает математику

блин я понимаю что это все легко,но мне надо это самому осмыслить))

if a mod n = 0 then s:= s + a

end

и всё вроде

ну так тебе же сверху весь алгоритм обоих задач описали.

тебе вряд ли поможет что-то уж сильно это осмыслить, я хз

попробуй руками расписать на бумаге алгоритм для решения задачи

или текстом как это делал я в после выше

или какими-то схемами с действиями

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

готовый влгоритм превратить в код - нехуй делать

спасибо,буду думать ,могу я код скинуть сюда ,что то не работает,сумма =0..

ну скинь код что был до редакта и добавь то, что написал я

если я не ошибся в синтаксисе, то должно работать

var a,b,n,s,i:integer;

begin

s:=0;

write('Задайте отрезок');

read(a);

write('Задайте отрезок');

;read(b);

write('n=');

read(n);

for i:= a to b do

if a mod n = 0 then s:=s+a;

write(s);

если for i:= a to b

то во второй строке "if i mod n"

в конце цикла вроде нужен end (перед строкой write(s))

end я просто не скопировал,все равно не правильно он сумму считает.

var a,b,n,s,i:integer;

begin

s:=0;

write('Задайте отрезок');

read(a);

write('Задайте отрезок');

;read(b);

write('n=');

read(n);

for i:= a to b do

if i mod n = 0 then s:=s+a;

write(s);

end.

мне нужна сумма чисел из отрезка которые делятся на n

Задайте отрезок1

Задайте отрезок6

n=2

3

вот так получается..

тебе вряд ли поможет что-то уж сильно это осмыслить, я хз

 

попробуй руками расписать на бумаге алгоритм для решения задачи

 

или текстом как это делал я в после выше

или какими-то схемами с действиями

 

 

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

готовый влгоритм превратить в код - нехуй делать

Познай всю мощь энтерпрайса

есть какой-нибудь толковый фришный софт чтоб такое строить?

мне нужна сумма чисел из отрезка которые делятся на n

Задайте отрезок1

Задайте отрезок6

n=2

3

вот так получается..

хз, я сейчас сделаю такой алгоритм на C# и если будет работать - значит алгоритм верный, а ошибка где-то в реализации на паскале

нашёл

if i mod n = 0 then s:=s+a;

=>

if i mod n = 0 then s:=s+i;

я пофиксил a -> i в условии, но не пофиксил в прибавке

кстати на этой почве мой личный совет №1 по программированию

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

если не поможет - попробовать переписать сам алгоритм

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

озарение обычно приходит когда ты пишешь с нуля

есть какой-нибудь толковый фришный софт чтоб такое строить?

Наверняка есть, я не искал. Точно находил для сиквенс диаграмм, прям в онлайне. А так, мы на работе пользуемся Enterprise Architect и MS Visio.

а. ну и ясен хуй визио в проф пакете оффиса

Блоки не по госту, атата!

а. ну и ясен хуй визио в проф пакете оффиса

а. ну и ясен хуй визио в проф пакете оффиса

когда в универе к лабе нужно было запилить блок схему, была софтина, которая их строила, но чтобы выгрузить требовалась лицензия, мы принтскринили и в отчет скрины кидали

а. ну и ясен хуй визио в проф пакете оффиса

rational rose ключи в нете есть

да я не хочу пиратки, с ними как раз у меня могут быть проблемы

а. ну и ясен хуй визио в проф пакете оффиса

когда в универе к лабе нужно было запилить блок схему, была софтина, которая их строила, но чтобы выгрузить требовалась лицензия, мы принтскринили и в отчет скрины кидали

https://www.draw.io/

http://www.gliffy.com/

https://www.draw.io/

хах, норм

спасибо