Дан массив, содержащий 30 целых чисел. Элементы массива могут принимать целые значения от...

Question

Дан массив, содержащий 30 целых чисел. Элементы массива могут принимать целые значения от 0 до 1000. Опишите на одном из языков программирования алгоритм, позволяющий найти минимально трехзначное число, записанное в этом массиве. Если такого числа нет то нужно вывести сообщение об этом.



const
n=30;
var
a: array [1..n] of integer;
i, j, min: integer;
begin
for i:=1 to n do
readln(a[i]);
.......
end.



ПАСКАЛЬ

Answer 1

Const n=30;
var a:array[1..n] of integer;
i,min:integer;
begin
min:=1000;
for i:=1 to n do
begin
readln(a[i]);
if (a[i] div 100>=1) and(a[i]end;
if (min=1000) then writeln('Такого числа нет')
else writeln('Минимальное 3-значное число равняется ',min);
end.