Задача 19 урок 13.1
Primary tabs
Модифицируйте предыдущий вывод "ёлочкой" так, чтобы в каждой нечетной строке выводились только четные числа, а в каждой четной только нечетные, например для N=17:
3 4 6 7 9 12 14 17
program zadacha19; var i, j, n, m: integer; begin writeln('Vvedite chislo N:'); readln(n); m:=1; i:=1; repeat j:=1; while (j<=m) and (i<=n) do begin if (m mod 2 = 0) and (i mod 2 = 0) then write(i, ' '); if (m mod 2 = 1) and (i mod 2 = 1) then write(i, ' '); i:=i+1; j:=j+1; end; writeln(); m:=m+1; until i>=n; readln(); end.
- Log in to post comments
- 1450 reads
vedro-compota
Sun, 12/05/2021 - 13:39
Permalink
if (m mod 2 = 0) and (i mod 2
-- оптимизировать, если они не могут выполняться одновременно
_____________
матфак вгу и остальная классика =)
Denisyndi
Mon, 12/06/2021 - 15:04
Permalink
С оптимизированным решением
vedro-compota
Sun, 12/12/2021 - 13:12
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)