Задача на языке паскаль!
Задан массив С из 10 элементов. Найти номер первого из элементов массива С, имеющего нулевое значение. Если таких элементов нет, вывести соответствующее сообщение.


cdkayzer777: Через какую команду можно вывести значение в делфи7? Через лэйбл, едит1 или object drwgrd1: TDrawGrid?Cdkayzer777 сейчас

Ответы

Ответ дал: allangarsk
1
var i,n,k:integer;C:Array[1..10] of integer;
begin
k:=0;
for i:=1 to 10 do begin
C[i]:= random(10)-5;
write(C[i]:4);
if (C[i] = 0) and (k = 0) then begin
n:= i; k:=1;
end;
end;
write('  n=',n);
end.

cdkayzer777: я всё равно в этом не разбираюсь! но в делфи выдаёт ошибку:
cdkayzer777: [Warning] Unit1.pas(40): Variable 'n' might not have been initialized
cdkayzer777: Есть другие варианты?
cdkayzer777: Через какую команду можно вывести значение в делфи7? Через лэйбл, едит1 или object drwgrd1: TDrawGrid?
cdkayzer777: выводит такую ошибку: [Warning] Project1.dpr(20): Variable 'n' might not have been initialized и указывает на write
Вас заинтересует