Пользователь вводит пятизначное число,необходимо составить обратное число,заменив четные значения разрядов на нечетные и наоборот паскаль
169
196
Ответы на вопрос:
var
n, m: longint;
a: byte;
begin
readln(n);
m : = 0;
while n> 0 do begin
a : = n mod 10;
n : = n div 10;
m : = m*10 + a;
end;
writeln(m);
readln;
end.
Пишу только процедуру вывода, с++ void out(vector< int> a) { for(size_t i = 1; i < a.size(); i += 2) cout < < a[i] * a[i] < < endl; }
Популярно: Информатика
-
qaz16090421.11.2022 15:33
-
bondarsofia14.07.2022 11:19
-
рита200813.02.2022 06:58
-
kristinasurinaKighkj15.12.2020 19:26
-
mia7331.05.2020 06:39
-
andreyrekvinov24.04.2021 05:38
-
ииоииири25.12.2022 05:45
-
ириша18230013.05.2021 11:25
-
alkadraz1232109.02.2022 07:50
-
dimonst30.04.2020 21:11