Var a,b,sg:real;
Begin
writeln('Введите два неотрицательных числа a и b');
readln(a,b);
sg:=(sqrt(sqr(a*b)));
writeln('Среднее геометрическое чисел a и b ',sg);
<span>end.</span>
var x, L, M: integer;
begin
readln(x);
L := 0;
M := 0;
while x > 0 do
begin
L := L + 1;
if x mod 2 = 0 then
M := M + (x mod 10) div 2;
x := x div 10;
end;
writeln(L);
writeln(M);
end.
Ответ:
var i: integer;
begin
for i:=10 to 99 do
if (i mod 7 = 0) and (616 mod i = 0) then writeln (i)
end.
I=1 s=0+1*1=1
i=2 s=1+2*2=5
i=3 s=5+3*3=14
i=4 s=14+4*4=30
i=5 s=30+5*5=55
Ответ: s=55
Ответ:
2)121514
Объяснение:
Предположим, у нас такие два числа: abc и xyz.
Сумма старших разрядов: a+x
Сумма средних разрядов: b+y
Сумма младших разрядов: c+z
При этом сумма двух разрядов не может быть больше 18, так как максимальная цифра в 10-ной системе счисления 9, то максимальная сумма двух цифр = 9+9=18.
т.е мы сразу исключаем вариант 3 и 4 т.к. в них присутствуют суммы разрядов 19 и 21, а такого быть не может.
Также есть условие
К нему дописывается результат сложения средних разрядов по такому правилу: если он меньше первой суммы, то полученное число приписывается к первому слева, иначе – справа.
То есть получается, что две первые суммы разрядов записаны в порядке возрастания, а по такому условию, из двух оставшихся подходит только вариант 2