Информатика: Информатика. Дано логическое выражение:

Varvaralikhtsr1

28.03.2023 21:12

Информатика

Есть ответ 👍

Информатика. Дано логическое выражение:

135

296

Посмотреть ответы 1

Ответы на вопрос:

pughluy

Информатика

4,4(22 оценок)

{в данной последовательности к числу сначала 2 раза прибавляется 3, после один раз вычитается 3. данная программа "ест" много памяти, но с ходу я ничего лучше не могу придумать} //pascal abc.net v3.0 сборка 1111 var i,k: integer; ar: array[1..2100] of integer; begin ar[1]: =3; ar[2]: =6; ar[3]: =9; ar[4]: =6; i: =4; while i< 2015 do begin; inc(i); ar[i]: =ar[i-1]+3; inc(i); ar[i]: =ar[i-1]+3; inc(i); ar[i]: =ar[i-1]-3; end; write(ar[2015]); end.ответ: 2019