1)Напишите программу для вычисления наименьшего из четырёх чисел для этого создана функция min4 в Python 2)Напишите программу для вычисления степени K (целое)числа а (действительное).Для этого создайте функцию stepen(a,k). 3)Дана строка из латинских букв и цифр .Напишите программу для подсчёта количества символов в этой строке. 4)Напишите программу ,зеркало отражающую заданное число .Например,123 отражается как 321.Используйте функцию. 5)Дана последовательность чисел,заканчивающихся нулем .Создайте программу,которая вычисляет сумму чисел без использования цикла. Например,1 7 9 0=17 6)напишите функцию для преобразования заданной единицы в тоннах, килограммах и граммах в граммы. Наверху есть таблица нужно !
procedure Calc(x: integer; var L: integer; var M: integer); begin L := 0; M := 0; while x > 0 do begin L := L + 1; if M < (x mod 5) then M := x mod 5; X := x div 5; end; end;
begin for x := 100 to 500 do begin Calc(x, L, M); if (L = 3) and (M = 4) then Println(x, L, M); end; end.
суть процедуры заключается в том что она вычисляет кол-во цифр в 5ричном числе (L) и максимальну цифру в числе (М) Максимальным для L=3 M=4 будет 124 или "444"_5
var
k, rk, n: longint;
function f(n: longint): longint;
begin
f := n * n * n;
end;
function calc(k: longint): longint;
var
i: longint;
begin
i := 1;
while f(i) < k do
i := i + 1;
if f(i) - k <= k - f(i - 1) then
calc := i
else calc := i - 1;
end;
begin
rk := calc(10);
n := 0;
for k := 1 to 1000 do
if calc(k) = rk then
begin
writeln('calc(', k, ') = ', calc(k));
n := n + 1;
end;
writeln(n);
end.
вывод
calc(5) = 2
calc(6) = 2
calc(7) = 2
calc(8) = 2
calc(9) = 2
calc(10) = 2
calc(11) = 2
calc(12) = 2
calc(13) = 2
calc(14) = 2
calc(15) = 2
calc(16) = 2
calc(17) = 2
13
var
x, L, M: integer;
procedure Calc(x: integer; var L: integer; var M: integer);
begin
L := 0;
M := 0;
while x > 0 do
begin
L := L + 1;
if M < (x mod 5) then
M := x mod 5;
X := x div 5;
end;
end;
begin
for x := 100 to 500 do
begin
Calc(x, L, M);
if (L = 3) and (M = 4) then
Println(x, L, M);
end;
end.
Вывод
100 3 4
101 3 4
102 3 4
103 3 4
104 3 4
105 3 4
106 3 4
107 3 4
108 3 4
109 3 4
110 3 4
111 3 4
112 3 4
113 3 4
114 3 4
115 3 4
116 3 4
117 3 4
118 3 4
119 3 4
120 3 4
121 3 4
122 3 4
123 3 4
124 3 4
суть процедуры заключается в том что она вычисляет кол-во цифр в 5ричном числе (L) и максимальну цифру в числе (М)
Максимальным для L=3 M=4 будет 124 или "444"_5