for i:=0 to n do begin. if A[n-i]-A[і] < A[і] then

n: = 10;

for i: =0 to n do begin

if A[n-i]-A[і] < A[і] then

s: =s+A[і];

end;

В начале выполнения этого фрагмента в массиве находились числа 0, 2, 4, 6, 8, 10, 12, 14, 16, 18, 20, т. е. А[0]=0, А[1]=2 и т. д. Чему будет равно значение переменной s после выполнения данной программы?

Бейсик	Python
s = 0 FOR i = 0 TO n IF A(n-i)-A(i) < A(i) THEN s=s+A(i) ENDIF NEXT i	S=0 n=0 for i in range(0, n): if A[n-i]-A[i] < A[i]: s=s+A[i]
Паскаль	Алгоритмический язык
s: = 0; n: = 10; for i: =0 to n do begin if A[n-i]-A[і] < A[і] then s: =s+A[і]; end;	s: = 0 нц для i от 0 до n если A[n-i]-A[i]< A[i] то s: =s+A[i] все кц
Си
S=0; for (i = 0; i < = n; i++) if (A[i — 1]-A[i]< A[i]) { c++; s: =s+A[i]; }

Ответ___________

Задание 20

Ниже записана программа. Получив на вход число , эта программа печатает два числа, и . Укажите наибольшее из таких чисел , при вводе которых алгоритм печатает сначала 3, а потом 120.

Бейсик	Python
DIM X, L, M AS INTEGER INPUT X L=0: M=1 WHILE X > 0 L = L+1 M = M *(X M O D 8) X = X DIV 8 WEND PRINT L PRINT M	x = int(input()) L = 0 M = 1 while x > 0: L = L + 1 M = M * (x mod 8) x = x div 8 print(L) print(M )
Паскаль	Алгоритмический язык
var x, L, M: integer; begin readln(x); L: =0; M: =1; while x > 0 do begin L: =L+1; M: = M*(x mod 8); x: = x div 8; end; writeln(L); write(M); end.	алг нач цел x, L, M ввод x L: =0; M: =1 нц пока x> 0 L: =L+1 M: =M * mod (x, 8) x: =div (x, 8) кц вывод L, нс, M кон
Си
#include< stdio. h> int main(void) { int x, L, M; scanf(" %d", & x); L = 0; M = 1; while (x > 0){ L = L + 1; M = M * (x % 10); x = x / 10; } printf(" %d\n%d", L, M ); }

Ответ____________

Задание 22

1) У исполнителя Калькулятор три команды, которым присвоены номера: