В"кумир". 8 класс 1) ввести число. если оно больше 10, разделить его на 2, если меньше или равно 10, то умножить на 5. 2) ввести два числа . если их сумма больше 100, то сумму уменьшить в 2 раза, в противном случае увеличить в 2 раза

№1

алг
нач
вещ a
ввод a
если a>10 то a:=a/2 иначе a:=a*5 все
вывод a
кон

№2

алг
нач
вещ a,b,sum
ввод a,b
sum:=a+b
если sum>100 то sum:=sum/2 иначе sum:=sum*2 все
вывод sum
кон

1)var
n:real;
begin
readln(n);
if n>10 then
n:=n/2
else
n:=n*5;
writeln(n);
end.

2) var
  a, b: integer;
begin
  writeln('Введите два числа: ');
  read(a, b);
  if a + b > 100 then writeln((a + b) / 2)
  else writeln((a + b) * 2);
end.

1)
uses crt;
var a:array [1..15] of integer;
     i,k:integer;
begin
  randomize;
  k:=0;
  for i:=1 to 15 do
    begin
      a[i]:=random(10)-3;
      if (a[i]<0) then inc(k);
      write (a[i],' ');
    end;
  writeln;
  writeln (k/15*100,'%');
end.

2)
uses crt;
var a:array [1..20] of integer;
     i:integer;
begin
  randomize;
  for i:=1 to 20 do
    begin
      a[i]:=random(30);
      write (a[i],' ');
    end;
  writeln;
  for i:=1 to 20 do
    if (a[i] mod 10 = 3) then write (a[i],' ');
end.

3)
uses crt;
var a:array [1..20] of integer;
     i:integer;
     k:longint;
begin
  randomize;
  k:=1;
  for i:=1 to 20 do
    begin
      a[i]:=random(30);
      write (a[i],' ');
      if (a[i]>9) and (a[i]<100) then k:=k*a[i];
    end;
  writeln;
  writeln (k);
end.

4)
uses crt;
var a:array [1..30] of integer;
     i:integer;
     flag:boolean;
begin
  randomize;
  for i:=1 to 30 do
    begin
      a[i]:=random(30);
      write (a[i],' ');
    end;
  writeln;
  flag:=true;
  for i:=1 to 29 do
    if (a[i]>a[i+1]) then
     begin
       flag:=false;
       break;
     end;
  writeln (flag);
end.

позиционная систе́ма счисле́ния (позиционная нумерация) — система счисления, в которой значение каждого числового знака (цифры) в записи числа зависит от его позиции (разряда).изобретение позиционной нумерации, основанной на поместном значении цифр, приписывается шумерам и вавилонянам. в более поздний период такая нумерация была развита индусами и имела неоценимые последствия в цивилизации. к числу таких систем относится десятичная система счисления, возникновение которой связано со счётом на пальцах. в средневековой европе она появилась через итальянских купцов, в свою очередь заимствовавших её у жителей средней азии.