Var mas: array [1 ... 10] of integer;

k, i:integer;

begin

for i:=1 to 10 do

k:=0;

readln (a[i]) ;

k:=k+a[i];

writeln (a[i] '+') ;

write (k) ;

end.

Где ошибка?!

Question

Информатика

Алеха

5 декабря, 04:01

Var mas: array [1 ... 10] of integer;

k, i:integer;

begin

for i:=1 to 10 do

k:=0;

readln (a[i]) ;

k:=k+a[i];

writeln (a[i] '+') ;

write (k) ;

end.

Где ошибка?!

+4

Ответы (2)

Знаете ответ на вопрос?

Вавила · Answer 1

Ты не указал переменную "а[i]"

Тимур · Answer 2

Var mas: array [1 ... 10] of integer;

k, i:integer;

begin

for i:=1 to 10 do

k:=0;

readln (mas[i]) ;

k:=k+mas[i];

writeln (mas[i],'+') ;

write (k) ;

end.

Var mas: array [1 ... 10] of integer;k, i:integer;beginfor i:=1 to 10 dok:=0;readln (a[i]) ;k:=k+a[i];writeln (a[i] '+') ;write (k) ;end.Где ошибка?!

Var mas: array [1 ... 10] of integer;

k, i:integer;

begin

for i:=1 to 10 do

k:=0;

readln (a[i]) ;

k:=k+a[i];

writeln (a[i] '+') ;

write (k) ;

end.

Где ошибка?!