Задача 2 : Написать программу определения цифр трехзначного числа. program examp2_1; var a, z1,z2,z3, rez : integer; begin writeln('Введите число’); readln(a); z1:=a Mod 10; writeln('Цифра единиц числа - ’z1); z2:=(a Div 10) Mod 10; writeln('Цифра десятков числа - ’z2); z3:=a Div 100; writeln('Цифра сотен числа - ’z3); rez:=z3*100+z2*10+z1; writeln('Это тоже число - ’rez);end. 5. Измените программу exampl2_2 для нахождения цифр четырехзначного числа. Сохраните ее под именем exampl2_3. Решите следующую задачу : Дано двузначное число. Определить :а) сумму и произведение цифр числа;число,образованное перестановкой цифр числа.
Ответы
Ответ дал:
0
Высылаю вам 2 картинки, надеюсь разберетесь =)
Приложения:
![](https://st.uroker.com/files/21b/21b862926c150fbb2c4a9b0091e97172.png)
![](https://st.uroker.com/files/5ae/5ae1a5fa5a277ba6023a65c09c2ec7c8.png)
Вас заинтересует
1 год назад
1 год назад
2 года назад
7 лет назад
7 лет назад