Информатика, опубликовано 2018-08-22 23:51:26 by Гость
Дано трёхзначное число. Найти число, полученное при перестановке второй и третьей цифры заданного числа. в Паскале abc
Ответ оставил Гость
Var a:integer;
begin
writeln(Введите число);
read(a);
a := a div 100*100 + a mod 10*10+ a mod 100 div 10;
writeln(a);
end.
Не нашли ответа?
Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.