173.35=1.386.8
6363=6,515,712 или 795,375
568328=71,041
4,25=4,352
232=232
<span>var
</span><span><span> a,b,c:</span>integer;
</span><span><span> begin
</span><span> read(a,b,c);</span>
</span><span> writeln(a,'+',b,'+',c,'=',a+b+c);
</span><span> writeln(a,'*',b,'*',c,'=',a*b*c);
</span><span> writeln('(',a,'+',b,'+',c,')/3=',(a+b+c)/3:4:3);
</span><span><span> end.</span></span>
A=10 S=0+10=10 вывод 10
A =7 S=10+7=17 вывод 7
A =4 S=17+4 =21 вывод 4
A= 1 S=21+1 =22 вывод 1
A=-2 вывод 22
Var q1,q2,q3,n:integer;beginwrite('Введите трехзначное число n ');read(n);q3:= n mod 10;q2:= n div 10;q2:= q2 mod 10;q1:= n div 100;writeln(q1:4,q2:4,q3:4);if q2 = q1*q3 thenwrite('Цифра, расположенная в середине числа, равна произведению двух крайних цифр')elsewrite('Цифра, расположенная в середине числа, не равна произведению двух крайних цифр');<span>end.</span>