Дано четырехзначное число. найти число, полученное - вопрос №4604953 от romkastolz 22.11.2022 06:02

Question

Информатика: Дано четырехзначное число. найти число, полученное перестановкой второй и третьей цифры заданного числа. (например, 4567 4657)

romkastolz · Answer

Var s:string;a,bug:integer;n1,n2:char;begin;readln(a);str(a,s);n1:=s[2];n2:=s[3];s[3]:=n1;s[2]:=n2;val(s,a,bug);writeln(a);end....

Дано четырехзначное число. найти число, полученное перестановкой второй и третьей цифры заданного числа. (например, 4567 > 4657)