1. Задача: Задано двузначное число. Поменять местами первую и вторую цифры числа. Выполнить готовую программу и протестировать ее для чисел 35, 27. Var a,b,al,a2: integer; Begin a= '); Write('введите значение a= Readin(a); a1:=a mod 10; {Выделение последней цифры в двузначном числе} a2:=a div 10; {Выделение первой цифры в двузначном числе} b:=al*10+a2; Write('искомое число =',b);
Приложения:
![](https://st.uroker.com/files/1fd/1fd69714351705f69857e3ad3fbc0b78.jpg)
Ответы
Ответ дал:
0
Ответ:
1) 53, 72
2) Замените строку
b:= a1 * 10+a2;
на строку
b:=a1 * a2;
Вас заинтересует
3 месяца назад
3 месяца назад
4 месяца назад
4 месяца назад
1 год назад
1 год назад
7 лет назад