Задача 4 Урок 13.2
Primary tabs
Подготовительная задача для "счет"
У вас есть число от 1 до 9, вывести его в представлении как счетах со сдвинутыми костями (всего десять костей на спице):
если ноль, то все кости справа:---++++++++++если три, то значащая часть слева, а все отстальное справа:
+++---+++++++если девять:
+++++++++---+
var a, j: integer; begin writeln ('Vvedite visotu flaga'); readln(a); for j := 1 to a do write('+'); write('---'); for j := 1 to (10 - a) do write('+'); end.
КОНСОЛЬ
Vvedite visotu flaga 5 +++++---+++++
- Log in to post comments
- 299 reads