karpovaveronika196
?>

Запиши развёрнутую запись числа 0, 356 для дробной части числа. ответ: 0, 356 = -10 10 - 10 ответить

Информатика

Ответы

predatorfishing608
<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title></title>
</head>
<body bgcolor=lightgrey>
<font color=red face="Arial"><h1 align=center>Иванов</h1>
<h2 align=center>Иван Иванович</h2>
</font>
<hr width=50%>
<a href="document2.html">На страницу 2</a>
</body>
</html>

<!DOCTYPE html>
<html>
<head>
<meta charset="UTF-8">
<title></title>
</head>
<body bgcolor=lightgrey>
<font color=blue face="Arial"><h1 align=center>Иванов</h1>
<h2 align=center>Иван Иванович</h2>
</font>
<hr width=50%>
<font face="Times New Roman">
<ul>
Список группы:
<li> Чел1
<li> Чел2
<li> Чел3
<li> Чел4
<li> Чел5
<li> Чел6
</ul>
<ul type=square>
Список отсутствующих:
<li> Чел1
<li> Чел2
<li> Чел3
</ul>
</body>
</html>
kruttorg

Program Begenjov1997;

const

 n = 40; {Количество элементов массива}

 m = 10000; {Максимально возможное значение элемента}

var

 a:array[1..n] of integer;

 i,min: integer; b:boolean;

 s:string;

 

begin

 s:=' -=Alphaeus=- ';

 for i:=1 to 22 do begin write(s[i]); sleep(60) end;

{заполняем массив случайными числами}

 writeln; randomize;

 for i:=1 to n do a[i]:=random(m+1);

{Ищем минимальный элемент с семеркой в конце в 8-ичной записи}

 min:=a[1]; b:=false;

 for i:=2 to n do  

   if (a[i] mod 8 = 7) and (a[i]<min) then

     begin

       min:=a[i];

       b:=true;

     end;  

{выводим min}

 writeln;

     if b then writeln('минимальный элемент с семеркой в конце в 8-ичной записи = ',min)  

       else writeln('0 (нет такого элемента)');

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Запиши развёрнутую запись числа 0, 356 для дробной части числа. ответ: 0, 356 = -10 10 - 10 ответить
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

udalova-yelena
nopel91668
platonovkosty
Олег2014
lmedintseva6
ashantik
Barabanov Gerasimenko
zotovinbox468
Demina-Khokhlov584
olg14855767
cherry-sweet871435
e-liza-k
sve-lysenko
bd201188
solonataly5