составьте программу из 16 случайных целых чисел от -20 до 20,и опередяет,есть ли в этом массиве целые числа,равные 0. На экран выводятся исходный массив и индекс последнего найденого элемента
Copyright © 2025 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
var k:=-1;
var a:array[1..16] of integer;
for var i:=1 to 16 do begin
a[i]:=20-random(40)+1;
print(a[i]);
if a[i]=0 then k:=i;
end;
if k<>-1 then writeln('Индекс :',k);
end.