1)дано двухзначное число "m" получить "n" образовавшим вписование цыфры "1" межд...

August 2022 1 9 Report

1)дано двухзначное число "m" получить "n" образовавшим вписование цыфры "1" между цифрами 65 и 615
2) Дано трехзначное число "n" получить "m" заменяя на "0" средние цифры 81 и 851
3) получить число "m" образовавшись перестановкой цифр 100 и 10 (сотен и десятков) "n"

Answers & Comments

FANTSCR1N Program z10; Var m,n:integer;Begin writeln('Задание 1: '); write('Введите двухзначное число m - '); readln(m); n:= m div 10 * 100 + 10 + m mod 10; writeln('N = ', n); writeln; writeln('Задание 2: '); write('Введите трехзначное число n - '); readln(n); m:= n div 100 * 100 + n mod 10; writeln('M = ', m); writeln; writeln('Задание 3: '); write('Введите трехзначное число n - '); readln(n); m:= n div 100 * 10 + n div 10 mod 10 * 100 + n mod 10; writeln('M = ', m); writeln; End.

1 votes Thanks 1

Answers & Comments

рекомендуемые вопросы

Helpful Links

Helpful Social