Вопрос по задаче №2 из главы 12.2. Переделать цикл while на for (продолжение)

Primary tabs

gani84's picture
Submitted by gani84 on Mon, 05/27/2019 - 10:42

Forums:

Начало здесь

Решение но что то не то

var i:integer;

begin

    for i:=1 to 100 do
    begin

       if (i div 5)=0  then //если i  делиться на 5 на цело
          write(i,'  ') // тогда выводим i который
       else
          break;  // прерываем цикл

    end;
   writeln();
   readln();
end.

Key Words for FKN + antitotal forum (CS VSU):

  • Log in to post comments
  • 2048 reads
vedro-compota's picture

vedro-compota

Mon, 05/27/2019 - 11:17

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

_____________
матфак вгу и остальная классика =)

vedro-compota's picture

vedro-compota

Mon, 05/27/2019 - 11:18

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

_____________
матфак вгу и остальная классика =)