Как нарисовать блок-схему?

[Kuk29]

Доброго времени суток.
уже вконец сломал голову.
нужно составить блок-схему, условие: Для целого числа к (от 1 до 99), напечатать фразу «Мне к лет», при этом в нужных случаях слово «лет» заменяется на слово «год» или «года». (Например: при k=76 «Мне 70 лет», при k=15 «Мне 15 лет», при к=23 «Мне 23 года» и т. п.)

[Alex11223]

Если кто-то просто решит за вас, это вряд ли поможет вам разобраться.

покажите свои наработки, конкретные вопросы и т.п.
http://www.programmersforum.ru/announcement.php?f=31

Или в раздел Фриланс если вы не хотите ничего делать, а ищете кого-то, кто выполнит ваши задачи за вознаграждение.

[digitalis]

Нужели такие элементарнейшие действия могут вызвать непонятки?
Взять листок бумаги и расписать все словами для всех вариантов числа "если ... то, иначе если..." и т.д. Это по силам? А затем известными графическими символами (https://ru.wikipedia.org/wiki/Блок-схема) все это нарисовать. Делов-то... Минимальные логические построения голова в состоянии совершить? Нет - тогда "bambino sorry" .
Вот примерно так:

[Serge_Bliznykov]

лучше так:
New_FlowChart_2.png

блок-схема сгенерёна автоматически программой FCEditor 1.6.117
по коду на Паскале.

код на Паскале я взял такой:

PROGRAM LETA2;

var
  year : integer;

begin
  repeat
    write('Введите ваш возраст (от 1 до 150 лет): ');
    readln(year);
  until (year > 0) and (year <= 150);

  {обработка исключении 11 12 13 14}
  if ((year mod 100)>=11) and ((year mod 100)<=14) then
      WriteLn('Мне ',year,' лет')
  else
    if (year mod 10)=1 then 
        WriteLn('Мне ',year,' год')
    else
      if ((year mod 10)>=2) and ((year mod 10)<=4) then 
        WriteLn('Мне ',year,' года')
      else
        WriteLn('Мне ',year,' лет');
end.

число mod 100 - это получить последние две цифры числа (двухзначное число равный остатку от деления на 100)

число mod 10 получить последнюю цифру числа (это остаток от деления на 10).

[digitalis]

Мой пример - универсальнее А финальную часть я бы еще укоротил.
А чтобы нарисовать блок-схему автоматом - еще Паскаль изучить надо ? Ужасть !
- Решил сварить обед. Перелистал поваренную книгу - ни одного подходящего рецепта.
- ?
- А каждый начинается так: "Возьмите чистуь кастрюлю..."

[Kuk29]

Сообщение от Serge_Bliznykov

лучше так:
Вложение 97691

блок-схема сгенерёна автоматически программой FCEditor 1.6.117
по коду на Паскале.

код на Паскале я взял такой:

PROGRAM LETA2;

var
  year : integer;

begin
  repeat
    write('Введите ваш возраст (от 1 до 150 лет): ');
    readln(year);
  until (year > 0) and (year <= 150);

  {обработка исключении 11 12 13 14}
  if ((year mod 100)>=11) and ((year mod 100)<=14) then
      WriteLn('Мне ',year,' лет')
  else
    if (year mod 10)=1 then 
        WriteLn('Мне ',year,' год')
    else
      if ((year mod 10)>=2) and ((year mod 10)<=4) then 
        WriteLn('Мне ',year,' года')
      else
        WriteLn('Мне ',year,' лет');
end.

число mod 100 - это получить последние две цифры числа (двухзначное число равный остатку от деления на 100)

число mod 10 получить последнюю цифру числа (это остаток от деления на 10).

спасибо, понял)