Урок 13.1 задача 16 (новая нумерация)
Primary tabs
Модифицируйте решение предыдущей задачи. так чтобы пользователь вводил второе число M, которое отвечало бы за длину возрастающего фрагмента:
program Project1; var m,n,i,j: integer; begin j:=6; write('Vvedite N: '); readln(n); write('Vvedite M: '); readln(m); if(n<8)then write('ERROR!') else begin for i:=1 to n do if(i mod (m+1)<>0)then begin j:=j+2; if(j>n)then break else write(j,' ') end else if(j=n) then break else write(3,' '); end; readln(); end.
- Log in to post comments
- 1549 reads
vedro-compota
Wed, 11/03/2021 - 19:17
Permalink
попробовать решить без break
попробовать решить без break (вообще)
_____________
матфак вгу и остальная классика =)
alexander263
Sun, 11/07/2021 - 13:18
Permalink
Исправлено. Решение без использования break.
vedro-compota
Sun, 11/07/2021 - 13:33
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)