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