<em>(1*2+3-4+5:6+7):8=1</em>
1*2=2
2*3=6
6-4=2
2+5=7
7-6=1
1+7=8
8:8=1
<em />
<em></em>
<em></em>
<em></em>
<em></em>
<em></em>
<em></em>
var
a: <em>integer</em>;
begin
write('Enter your age: ');
readln(a);
writeln('Your age in months is ', a * 12);
<span>end.</span>
begin
var a := 1234567;
var s := 0;
while a > 0 do
begin
s += Ord(a mod 10 mod 2 = 0);
a := a div 10;
end;
s.Println;
end.
Легко-
1)набираешь в обоих воду
2)Выливаешь В
3)Наливаешь А в В
4)Набираешь воду в А
5)Переливаешь воду в В
Так получается А-100 мл
Построение графиков заданных функций