Информатика, 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.