
Информатика, 10 класс
Готов
Вопрос от 2111 день назад
Выбери верно записанную программу на языке программирования Паскаль. Программа для нахождения суммы элементов массива. (Количество элементов в массиве — 21). var i,s:integer; begin clrscr; for i:=1 to -9 do begin write('a[',i,']='); read(a[i]); end; s:=0; for i:=1 to -9 do s:=s+a[i]; writeln('s=',s); readkey end. uses crt; var a:array[1..21] of integer; i,s:integer; begin clrscr; for i:=1 to 21 do begin write('a[',i,']='); read(a[i]); end; s:=0; for i:=1 to 21 do s:=s+a[i]; writeln('s=',s); readkey end. uses crt; var a:array[1..-9] of integer; i,s:integer; begin clrscr; for i:=1 to -9 do begin write('a[',i,']='); read(a[i]); end; s:=0; for i:=1 to -9 do s:=s+a[i]; writeln('s=',s); readkey end.
Ответ от
2й вариант правильный: uses crt; var a:array[1..21] of integer; i,s:integer; begin clrscr; for i:=1 to 21 do begin write('a[',i,']='); read(a[i]); end; s:=0; for i:=1 to 21 do s:=s+a[i]; writeln('s=',s); readkey end.