Задача 17 урок 13.1
Primary tabs
Модифицируйте решение предыдущей задачи. так чтобы пользователь вводил второе число M, которое отвечало бы за длину возрастающего фрагмента, например для M=4:
8101214четыре числа316182022четыре числа3....3....и т.д.
Заметьте. что в предыдущей задаче M было зафиксировано =2:
810два числа31416два числа3....3....и т.д.
program project1; var a,b,c,i: integer; begin writeln('Введите число '); readln(a); writeln('Еще раз введите число '); readln(b); if (a > 0) then while (c < a) do begin for i:=1 to b do c := c + 2; write(' ',c); write(' ', 3) end end.
- Log in to post comments
- 3466 reads
vedro-compota
Sat, 03/13/2021 - 22:47
Permalink
замечания по оформлению:
замечания по оформлению:
Пример правильно оформленной задачи: http://fkn.ktu10.com/?q=node/11402
_____________
матфак вгу и остальная классика =)
Alexey051
Sat, 03/13/2021 - 22:55
Permalink
program project1;
vedro-compota
Mon, 03/15/2021 - 11:28
Permalink
замечание по форматированию кода
- тело цикла while неправильно отформатировано, читайте о правилах форматирования кода.
_____________
матфак вгу и остальная классика =)