Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var
x : array [1..15] of integer;
i : integer;
min : integer;
kol_nol : integer;
begin
kol_nol : = 0;
for i: =1 to 15 do
write ("введите элемент массива: ");
readln(x[i]);
end;
min : = x[1];
for i : = 0 to 15 do
if (x[i] > 0) then
if (x[i] < min) then
min : = x[i];
if (x[i] = 0) then
inc(kol_nol);
writeln(min);
writeln(kol_nol);
21,24,27,30,33,36,39,42,45,48
классификации на : числа бывают: натуральными(1,2,3); целыми(2, -5); дробными(6,73). на : предложения бывают: простыми, сложными: сложноподчинёнными, сложносочинёнными, сложными с разными связи, сложные бессоюзные.
16-битной кодировке unicode.
один символ s =16 бит
количество бит текстового файла к= 51200 бит/с * 10 с= 512000
количество символов к/s=512000/16 =32000
Популярные вопросы