Фирс
6 год назад
Что надо переделать (или добавить) чтобы все работало? program dfgvsdrfg;
Var A: array [1..16] of integer;
k,i:integer;
begin
writeln('исходные значения');
for i: = 1 to 16 do
begin
A[i]: = random (41)-20;
write (A[i], '');
end;
writeln;
write('нулевые значения имеют элементы с индексами:')
for i: = 1 to 16 do
if A[i] = 0 then write (i, '');
end.
ОТВЕТЫ
Мережковский
Jul 4, 2019
Точку с запятой в строке write(нулевые значения имеют элементы с индексами:);
Ну и write (A[i], ); и write (i, ); правильнее сделать как (A[i], ); и write (i, ); (поставить пробел между кавычками).
Ну и write (A[i], ); и write (i, ); правильнее сделать как (A[i], ); и write (i, ); (поставить пробел между кавычками).
215
Смежные вопросы:
