4 и 5 задание ............

Знания

Информатика

1 ответ:

Андрей19644 года назад

0 0

Незноппповвеоппакепппппаааееппмвв

Читайте также

Поработай вычислительной машиной и перед тобой закодированное слово Расшифруй его используя таблицу кодов

Роберт123456

11001100 = М
11010011 = У
11001010 = К

0 0

4 года назад

Используя средства языка Паскаль ,сформировать массив из 15 чисел по формуле Ai=cos 5i-1/корень из i^3+9. Написать функцию для п

stasiok15 [37]

<u>PascalABC.NET 3.4.0, сборка 1677 от 17.06.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>

function CountCond(a:array of real):=a.Where(t->t<a.Average).Count;

begin
var a:=ArrGen(15,i->Cos(5*(i+1))-1/sqrt((i+1)**3+9)); a.Println;
Writeln('Элементов массива, меньших среднего арифметического: ',CountCond(a))
end.

0 0

4 года назад

Прочитать ещё 2 ответа

Ребят очень нужно решить задачу.ДАЮ 75 БАЛЛОВ + ПЕРВОМУ КТО ОТВЕТИТ ЛУЧШИЙ ЗАСЧИТАЮ. ПИШИТЕ НА PASCAL ABC!!!! В компьютер поступ

-Михаил- [5.5K]

Var
    best, m, s,i: integer;

begin
    best := 10000000;
    for i:= 1 to 3 do begin
        write('min sec = ');
        readln(m, s);
        if best > m * 60 + s then best := m * 60 + s;
    end;

    writeln('Лучший = ', best div 60, ' min ', best mod 60, ' sec');
end.

0 0

4 года назад

Сколько весит одна буква?

Замечательная

В разных кодировках по разному. обычно 1 символ - 1 байт(8бит)

0 0

4 года назад

Помогите пожалуйста, завтра сдавать.

Sergey1990 [13]

1. 5
2. 79
3. x=1, y=0 (см фото)

0 0

4 года назад