Писать только на алгоритмическом языке!) 1) Даны натуральные числа A и B. Напишите алгоритм, чтобы найти наибольшее из этих двух чисел.

2) Даны три числа: A, B и C. Найдите большее из этих трех чисел.

3) Дано 4-значное число A. Напишите алгоритм, который представляет собой сумму этих чисел.

4) Дано трехзначное число A. Напишите алгоритм, чтобы проверить, делится ли это число на заданные числа B и C.

5) Учитывая натуральное число N. Напишите алгоритм, чтобы найти сумму последовательности чисел от 1 до N.

6) Учитывая натуральные числа N и A. Напишите алгоритм, который печатает числа, которые делятся на заданное число A, из последовательности чисел от 1 до N.

7) Напишите алгоритм вывода чисел, равных одной сотой части трехзначного числа.

8) Учитывая натуральное число N. Напишите алгоритм вывода чисел в порядке убывания от 1 до N.

Program z3;  Var y: array [1..15] of real;      g: array [1..20] of real;      i,d, a,b: integer; sum, sum_2: real;Begin  writeln('Введите оплату труда за день'); read(d);  a:= 0;  b:= 0;  for i := 1 to 15 do  begin    y[i] := random (30);    if (y[i] < 10) then a:= a + 1;    y[i] := y[i] * d * 0.8;  end;      for i:=1 to 20 do    g[i] := random (30);    if (g[i] < 10) then b:= b + 1;    g[i] := g[i] * d * 0.8;    for i:=1 to 15 do  begin    writeln('Сотрудник y_',i,' - ',y[i]);    sum:= sum + y[i];  end;  writeln;  writeln('Сумма отдела y - ', sum);  writeln;  for i:=1 to 20 do  begin    writeln('Сотрудник g_',i,' - ',g[i]);    sum_2:= sum_2 + g[i];  end;  writeln;  writeln('Сумма отдела g - ', sum_2);  writeln;      writeln('В отделе y ', a, ' сотрудников работало меньше 10 дней');  writeln;  writeln('В отделе g ', b, ' сотрудников работало меньше 10 дней');  End.

Ри́мские ци́фры — цифры, использовавшиеся древними римлянами в их непозиционной системе счисления.

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

Римские цифры появились за 500 лет до нашей эры у этрусков, которые могли заимствовать часть цифр у прото-кельтов.