var a,b: array[1..10] of Integer;
i,n: integer;
begin
n:=1;
for i:=1 to 10 do readln(a[i]);
for i:=1 to 10 do
begin
if a[i]<>0 then
begin
b[n]:=a[i];
inc(n);
end;
end;
if n=1 then writeln('Элементов нет') else
for i:=1 to n-1 do writeln(b[i]);
end.

0 0

4 года назад

Какой знак применяется для обозначения абсолютной ссылки в MS Excel

myhamyha

Для обозначения абсолютной ссылки применяется знак $.Например:=$A$3+$B$4.Знак $ фиксирует имя столбца и номер строки

0 0

4 года назад

Информационное сообщение объёмом 1536 БАЙТ состоит из 512 символов. Какова мощность алфавита, с помощью которого записано это со

Екатерина26021987

По формуле I:K=N, где
I - Объем информации.
K - количество символов в сообщении.
N - мощность алфавита.

K=512
I=1536 байт=12288 бит
12288:512=24
Ответ: 24

0 0

4 года назад

Напишите пожалуйста эту таблицу на языке html

Анна Рестив [7]

<!DOCTYPE html>

<head>

<title>Таблица</title>

</head>

<body>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

<tr>

</tr>

</table>

</body>

</html>

ну ты конечно жжешь...

0 0

4 года назад