Выберите в выпадающем списке наиболее точное общее имя для каждой группы объектов. 1)Килограмм, грамм, - id1466257620210121 от clashof7a 21.01.2021 17:47

Question

Информатика: Выберите в выпадающем списке наиболее точное общее имя для каждой группы объектов. 1)Килограмм, грамм, тонна – единицы измерения массы? величины?единицы измерения?единицы измерения расстояния? 2)Принтер, плоттер, наушники, колонки – устройства вывода информации?устройства?компьютерные устройства?устройства ввода информации? 3)Смоленск, Казань, Уфа, Волгоград – города?европейские города?европейские столицы?российские города?

clashof7a · Accepted Answer

Program znanija;
var A:array[1..20] of integer;
i,k,min,n:integer;
begin
min:=1000000000; // прощу прощение за такое )

for i:=1 to 20 do A[i]:=random(9); // заполняем массив

for i:=1 to high(A) do // находим минимальное нечётное, запоминаем его номер
if (A[i] < min) and (A[i] mod 2 <> 0) then begin
n:=i; min:=A[i];
end;

for i:=1 to 20 do write(A[i]:3); // Выводит весь массив

writeln(); // просто перевод на новую строку для красоты

writeln('Minimum: ',min,' Ego nomer: ',n); // выдаём минимальное и его номер
end.

MOGZ ответил