tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано четырехзначное число.
Дано четырехзначное число. найти число, полученное перестановкой второй и третьей цифры заданного числа. (например, 4567 > 4657)
vikasibarik
3 10.07.2019 09:10
0
Ответы
Nikita6537
07.09.2020 08:53
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nfedorova868
15.06.2019 10:50
Составить программу, печатающую значение true, если указанное высказывание является истинным, и false в противном случае, когда целое a не кратно трем и оканчивается...
alidniva111
15.06.2019 10:50
Трое друзей – илья, костя и серёжа – принимали участие в олимпиаде по программированию, и один из них занял первое место. когда пришли в школу, учительница спросила,...
Белова1234567890
19.09.2021 12:09
Помагите полность с объяснением ....
PolinaRa1610200710
19.09.2021 12:21
Ребята заполнить таблицу в тетрадь (7 класс информатика)...
amid69
19.09.2021 12:26
отправки и получения электронного письма?...
Надежда1класс
19.09.2021 12:26
Петя хoчет пойти в кино, а Светa нa кaчели. Пaпa никaк не мoжет решиться, у кого из детей пойти нa поводу и решил пoдкинуть монетку. «Если выпaдет oрeл – идeм в кино!»...
maksatovna17
19.09.2021 12:27
Вставьте пропущенные слова вместо точек. Если в изучении информатики...-это главный объект то...-это инструмент...
Rexis808
19.09.2021 12:31
Как называется свойство алгоритма, заключающееся в отсутствие ошибок, алгоритм должен приводить к правильному результату для всех допустимых входных значениях...
adrianaartus8
19.09.2021 12:36
сделать таблицу в Excel, ничего не успеваю сделать. И , прикрепите файл или объясните как сделать 25б...
123456782121
19.09.2021 12:39
PascalABC.NET Опишите массивы, если: а) элементы массива содержат стоимость 15 блюд в школьной столовой (в рублях и копейках);б) элементы массива содержат количество...
Популярные вопросы
Отметьте три точки, не лежащие на одной прямой. через каждые две...
2
Учебник 7 класс нового времени: юдовская,баранов,ванюшкина.пор...
3
Первый рабочий выполняет за 4 часа, второй за 6 часов , третий...
2
Путешественник на острове лжецов и рыцарей встретил трех аборигенов....
3
Перечисли названия литосферных плит и укажи скорость их движения:...
1
Товара стоит a рублей b копеек. было куплено n штук этого товара....
1
Найти область определения функции y=...
2
Небольшое сочинение про мою подругу...
1
Читаю книги про o,o,o и o.придумать предложение...
2
Получение ангидрида пропионовой кислоты...
1
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.