разгадайте кроссворд "поянтия как форма мышления"

Знания

Информатика

1 ответ:

zzaya4 года назад

0 0

Понятия как форма мышления - логика подходит?

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

В целочисленом массиве A(35) найти количество нечетных элементов имеющих четные индексы. Считается что в массиве есть хотя бы од

TorSecurity

// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(35,-99,99); a.Println; // индексы от нуля!
Writeln('S=',a.Where((v,i)->i.IsEven and v.IsOdd).Sum)
end.

Пример
-71 65 -4 -59 -76 -8 -63 43 78 84 6 -59 26 -95 -80 99 67 11 -48 -35 38 -86 78 48 91 -91 78 2 96 83 25 2 -62 45 82
S=49

0 0

1 год назад

X принадлежит (-1;11] ПАСКАЛЬ нужно через if написатьт программу x принадлежит и x не принадлежит

Alila [78]

Var
x : real;
begin
read (x);
if (x > -1) and (x <= 11) then write ('принадлежит') else write ('не принадлежит');
end.

0 0

4 года назад

Файл размером 1000 Кбайт передаётся через некоторое соединение в течение 1 минуты. Определите размер файла (в Кбай

Мошкин Сергей Але... [220]

$\frac{1000 \times 36}{60} = 600$
600 Кбайт

0 0

4 года назад

Срочно!!!!!Представьте числа в виде суммы степеней основания.

71region

567(10) = 5*10^2+6*10^1+7*10^0

94.53(10) = 9*10^1+4*10^0+5*10^(-1)+3*10^(-2)

110.101(2) = 1*2^2+1*2^1+0*2^0+1*2^(-1)+0*2^(-2)+1*2^(-3)

11101(2) = 1*2^4+1*2^3+1*2^2+0*2^1+1*2^0

0 0

3 года назад

Напишите программу по 2,3и4 задание.HEIP!!!

Керасин

Var
    a, b: integer;
    x, y, z, t: integer;

begin
    {2}
    Readln(a);
    Writeln(Sign(a) * abs(a + 3));

    {3}
    Readln(a, b);
    if a > b then a := b;
    Writeln(a);

    {4}
    Readln(x, y, z);
    if (x > y) and (y > z) then t := 5
    else t := -1;
    x := x * t;
    y := y * t;
    z := z * t;
    Writeln(x, ' ', y, ' ', z)
end.

0 0

4 года назад