Регистрация
howl111
18.06.2020 20:22
Информатика
Есть ответ 👍

По данному фрагменту кода выясните, какими числами заполняется целочисленный массив а из десяти элементов: а[1]: =10; x: =3; y: =-1; for i: =2 to 10 do begin x: =x+2; y: =y*(-1); а[i]: =а[i-1]-x*y; end; найдите сумму элементов массива с чётными индексами. в ответе укажите только число, без каких-либо знаков препинания, например, 100

127
488
Посмотреть ответы 2

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

artymukina
artymukina
4,8(56 оценок)
Код полностью var       a: array[1..10] of integer;       x, y, i, s: integer; begin       a[1] : = 10;       x : = 3;       y : = -1;             for i : = 2 to 10 do       begin               x : = x + 2;               y : = y * (-1);               a[i] : = a[i - 1] - x * y;               write(a[i], ' ');               if i mod 2 = 0 then s : = s + a[i];       end;             writeln;       writeln(s); end. ответ 5
alamez69
alamez69
4,4(25 оценок)

===== PascalABC.NET =====

begin

 var s := ReadString;

 (s[::2] + s[2::2]).Print

end.

Популярно: Информатика