Program n1;
var a: array[1..12] of integer;
i,sum: integer;
begin
randomize;
sum:=0;
writeln('исходный массив:');
for i:=1 to 12 do
begin
a[i]:=random(15);
write(a[i],' ');
if i mod 2=0 then sum:=sum+a[i];
end;
writeln;
writeln('сумма: ',sum);
end.
INPUT "x=", x
PRINT 1 - 2 * x + 3 * x ^ 2 - 4 * x ^ 3
PRINT 1 + 2 * x + 3 * x ^ 2 + 4 * x ^ 3
<em><u>Тестовое решение:</u></em>
Y:\qbasic>QBASIC.EXE
x=2.37
-40.1375
75.83891
Заменяем буквы цифрами
А=0
К=1
Р=2
У=3
Слова соответствуют числам четверичной системы счисления, т.к. в алфавите всего четыре буквы, и слова записаны в алфавитном порядке.
Слово УКАРА = 31020(3) = 840 в десятичной
840 будет записано под номером 841.
Ответ: 841
А чем тут помочь , если тут все уже решено?
Система уравнений:
x=2*y
3*z=t
t=x+35
z=3*y
Решая ее получаем: x=10; y=5; z=15; t=45
x- Число лет Максима
y- Число лет Тани
z- Число орехов Максима
t- Число орехов Тани
Ответ:
Максиму 10 лет и у него 15 орехов
Тани 5 лет и у нее 45 орехов