1) S=11, A=11
2)
var
    n, num, c, i: integer;

begin
    read(n);
    for i := 1 to n do
    begin
        read(num);
        if num > 0 then c := c + 1;
    end;
    writeln(c);
end.
3)
var
    i: integer;
    h: real;

begin
    h := 50;

    while h < 500 do
    begin
        i := i + 1;
        h := h * 1.5;
    end;

    writeln(i);
end.

0 0

4 года назад

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

Абзацем текстовом процессоре является?Подскажите пожалуйста

Зубовский 4 [7]

Линейка ей отменяют начало абзаца

0 0

3 года назад

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

Исполните следующий фрагмент линейного алгоритма для а=х и b=у.а:=a+bb:=b-aa:=a+bb:=-bКакие значения присвоены переменным а и b?

Rah [24]

Данная задача решается подстановкой значений одних переменных в другие,следуя линейному алгоритму:
a=x , b=y
1) a:=a+b = x+y
2) b:= b-a = y-(x+y) = y-x-y=-x
3) a:= a+b = x+y+(-x) = x+y-x=y
4) b:=-b=-(-x)=x

Итог: а = y, b = x
Верный ответ а) y,x

0 0

4 года назад

СРОЧНОЗаписать предложения в виде соотношений формул логики преликатов. Методом резолюций выяснить, будет ли заключена логически

Ольга Каримуллина

Я тоже немогу это решыть (

0 0

3 года назад