D16+1001001=<span> D16+49=D5F</span>
P.S программа написана для Pascal.
program summa;
var
a, b, s : integer;
begin
writeln('Введите число a=');
read(a);
writeln('Введите число b=');
read(b);
s:=0;
for a:=a to b do
if a mod 3=0 then
s:=s+a;
writeln('Сумма: ',s);
end.
смотри эта задача похожа на комбинаторную)
1ый вопрос:
на первом месте есть 3 варианта буквы, на втором тоже 3, на третьем 3
=> всего слов 3 * 3 * 3 = 27
2ой:
1 - ая буква - м, => это как минимум 10-ое слово (т.к. в предыдущих 3 * 3 словах первая - и)
при этом 10 слово - мии => 11 слово - МИМ; 12 cлово - МИР;
3ий:
1-ая буква -Р это как минимум 19 слово (предыдущие 2 * 3 * начинаются на и или м)
19 слово - РИИ => 21 - PИМ
program
zadacha;
var
a,b,x,y,f:
real;
begin
writeln('vvedite
a,b,x');
readln(a,b,x);
y:=(sqr(a+b)*x)
/ (sqrt(sqr(a)+sqr(b)));
<span>f:=sqr(cos(y))
+ ((a-b)-a*x) / (y*b);</span>
writeln('y
=',y:6:2);
writeln('f(y)
=',f:6:2);
end.