Задание 4 Урок 13.2

Primary tabs

Submitted by Djos on Tue, 09/28/2021 - 11:13

Forums:

Задание 4 Урок 13.2

Подготовительная задача для "счет"
У вас есть число от 1 до 9, вывести его в представлении как счетах со сдвинутыми костями (всего десять костей на спице):

если ноль, то все кости справа:

---++++++++++

если три, то значащая часть слева, а все остальное справа:

+++---+++++++

если девять:

+++++++++---+
var a,b: integer;
begin
a:=1;
b:=9;
  while(a<=13) do begin
      if(a<=b) or (a>=b+4)then begin
         write('+');
      end
      else begin
         write('-');
      end;
      a:=a+1;
    end;
readln();
end.
  • Log in to post comments
  • 982 reads
vedro-compota's picture

vedro-compota

Wed, 09/29/2021 - 19:36

1) неправильное форматирование
2)

(a>=b+4)

-- почему бы и тут не использовать литерал почему именно (b+4)?

_____________
матфак вгу и остальная классика =)

Djos

Thu, 09/30/2021 - 20:43 

var a,b: integer;
begin
b:=9;
for a:=0 to 10 do
begin
  if(a<b) or (a>b)then
    write('+')
  else if (a=b) then
    write('---');
end;
readln();
end.
vedro-compota's picture

vedro-compota

Wed, 10/06/2021 - 21:03

решение засчитано

_____________
матфак вгу и остальная классика =)