1. раздели на 2 2. вычти 1 первая из них уменьшает число на экране в 2 раза, вторая уменьшает его на - id692337520220223 от annkuzochka3 23.02.2022 11:45

Question

Информатика: 1. раздели на 2 2. вычти 1 первая из них уменьшает число на экране в 2 раза, вторая уменьшает его на 1. исполнитель работает только с натуральными числами. составьте алгоритм получения из числа 65 числа 4, содержащий не более 5 команд. в ответе запишите только номера команд. (например, 12112 — это алгоритм: раздели на 2, вычти 1, раздели на 2, раздели на 2, вычти 1, который преобразует число 42 в число 4). если таких алгоритмов более одного, то запишите любой из них.

annkuzochka3 · Accepted Answer

Const
nn=100;

var
i,n,d:integer;
a:array[1..nn] of integer;

begin
Write('n = '); Read(n);
Randomize;
d:=0;
for i:=1 to n do begin
    a[i]:=Random(21)-10;
    Write(a[i],' ');
    if a[i]>0 then d:=d+1
    else
      if a[i]<0 then d:=d-1
    end;
Writeln;
if d>0 then Writeln('Положительных чисел больше')
else
    if d<0 then Writeln('Отрицательных чисел больше')
    else Writeln('Положительных и отрицательных поровну')
end.

Пример
n = 13
-1 -5 3 -3 -4 -8 1 6 4 7 -7 10 7
Положительных чисел больше

MOGZ ответил