Задача 2 Урок 22
Primary tabs
Дано целое положительное число N. Выведите на экран все число от 1 до N (по возрастанию).
var n1:integer; function vivod(N:integer):integer; begin if n>=1 then begin result:=vivod((n-1)); write(n); end else result:=n; end; begin n1:=5; vivod(n1); readln(); end.
- Log in to post comments
- 72 reads