Дан целочисленный массив из 30 элементов, все элементы которого –неотрицательные числа, не превосходящие 10000.опишите на языке или на одном из языков программирования ал- горитм, который находит и выводит минимальное трехзначное число, записанное в этом массиве. если таких чисел нет, нужно вывести сообщение «таких чисел нет». исходные данные объявлены так, как показано ниже. запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них. паскаль естественный язык constn=30; vara: array [1..n] of integer; i, j, min: integer; begin for i: =1 to n do readln(a[i]); end. объявляем массив aиз 30элементов. объяв- ляемцелочисленные переменные i, j,min. в цикле от 1 до 30 вводимэлементы массива aс 1-го по 30-й. в качестве ответа вам необходимо фрагмент программы (или описание алгоритма на естественном языке), который должен находиться на месте многоточия. вы можете записать ре- шение также на другом языке программирования (укажите название и используемую версию языка программирования, например, borland pascal 7.0) или в виде блок-схемы. в этом случае вы должны использовать те же самые исходные данные и переменные, какие были предложены в условии (например, в образце, записанном на естественном языке)

VIRUS00000 VIRUS00000    2   21.05.2019 08:50    4

Ответы
alisaBacura alisaBacura  15.06.2020 09:25

const N=5;
 var a: array [1..N] of integer;
 i, j, min: integer;
 begin
 for i:=1 to N do readln(a[i]);
 min:=10000;
 for i:=1 to N do if (a[i] div 100<>0) and (a[i]<min) then min:=a[i];
 writeln(min);
 end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика