Задача 4 Урок 13.2
Primary tabs
Подготовительная задача для "счет" Пользователь вводит число от 1 до 9, вывести его в представлении как счетах со сдвинутыми костями (всего десять костей на спице)
var a,b,n, i : integer; begin writeln('vvedite chislo'); readln(a); n := 11; b := 1; while b <= a do begin write('+'); b += 1; end; write('---'); n := n - (a + 1); for i := 1 to n do write('+'); readln(); end.
Вывод консоли:
vvedite chislo 3 +++---+++++++
- Log in to post comments
- 103 reads