var a, b, c, d: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма цифр равна: ', b + c + d); end.
2)
var a, b, c, d, p: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } p : = d * 100 + c * 10 + b; writeln('наоборот: ', p); end.
3)
var a, b, c, d, e: integer; begin readln(a); e : = a div 1000; { тысячи } b : = (a div 100) mod 10; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма: ', e + b + c + d); writeln('произведение: ', e * b * c * d); end.
horina12
17.05.2020
1) умножаешь обе стороны на 4. сокращается 4 слева и 2 справа. остается 11-3x=2. переносишь 2 налево от равно, при этом меняя знак на - . получаешь 11-2-3x=0. и переносишь x вправо от знака равно, также меняя знак с -, на плюс. получаешь 11-2=3x 9=3x. делишь обе стороны на 3, получаешь x=3 2) . делаем по тому же принципу что и выше. умножаем обе стороны на 5, чтобы сократить делитель. остается 3x+7=6x+4. меняем стороны, оставляя x c одной стороны, а числа с другой. при смене сторон не забываем менять знаки на противоположные. получаем 6x-3x=7-4 отсюда 3x=3 делим на 3 обе стороны и получаем, что x=1
1)
var a, b, c, d: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма цифр равна: ', b + c + d); end.
2)
var a, b, c, d, p: integer; begin readln(a); b : = a div 100; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } p : = d * 100 + c * 10 + b; writeln('наоборот: ', p); end.
3)
var a, b, c, d, e: integer; begin readln(a); e : = a div 1000; { тысячи } b : = (a div 100) mod 10; { сотни } c : = (a mod 100) div 10; { десятки } d : = a mod 10; { единицы } writeln('сумма: ', e + b + c + d); writeln('произведение: ', e * b * c * d); end.