1. Информатика
  2. Решить по паскалю.с полным

Решить по паскалю.с полным решением дано четырехзначное число. найти: а) число, полученное при прочтении его цифр справа налево; б) число, образованное перестановкой двух первых и двух последних цифр заданного числа. например, из числа 4566 получить 6645, из числа 7304 — 473; в) число, образованное перестановкой первой и второй, третьей и четвертой цифр заданного числа. например, из чис ла 5434 получить 4543, из числа 7048 — 784; г) число, образованное перестановкой второй и третьей цифр заданного числа. например, из числа 5084 получить 5804.

kazashkatv kazashkatv    1   08.08.2019 17:00    9

Ответы
ХошиСимидзу ХошиСимидзу  04.10.2020 05:25
Var
  i,n:integer;
  a:array[1..4] of integer;
begin
  Write('n='); Read(n);
  for i:=1 to 4 do begin
    a[5-i]:=n mod 10;
    n:=n div 10
    end;
  Writeln(a[4]*1000+a[3]*100+a[2]*10+a[1]);
  Writeln(a[3]*1000+a[4]*100+a[1]*10+a[2]);
  Writeln(a[2]*1000+a[1]*100+a[4]*10+a[3]);
  Writeln(a[1]*1000+a[3]*100+a[2]*10+a[4])
end.

Пример
n=7048
8407
4870
784
7408
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
nebeca nebeca  10.07.2019 20:10
Перевод программы с pascal на qbasic решение: var a, s: integer; begin s: = 0; readln(a); while a 0 do begin if (a mod 6 = 0) and (a mod 10 = 4) then s : = s + a;...
МарианМариан МарианМариан  10.07.2019 20:10
1. перевести данное число из десятичной системы счисления в двоичную, восьмеричную и шестнадцатеричную системы счисления. 2. перевести данное число в десятичную...
SashaUshanka SashaUshanka  22.05.2020 12:22
решить: Составить блок-схемы к следующим задачам: 1 В массиве целых чисел найти минимальный элемент среди отрицательный элементов. 2 Дан одномерный массив из действительных...
nAsTyAsUpErYeS nAsTyAsUpErYeS  22.05.2020 12:21
Работа какого периферийного устройства изображена на схеме:​...
ryzik1988 ryzik1988  14.07.2019 05:20
Из 18 т железной руды выплавляют 10 т железа. сколько железа выплавят из а т руды? составить программу в паскаль авс !...
biobiobio biobiobio  29.04.2020 10:28
Процесс подготовки системы к работе, заключающийся в пересылке программы из внешней памяти в оперативную,ее выполнении с подключением дополнительных файлов.°Горячий...
ArianatorLove ArianatorLove  29.04.2020 10:28
Таня набирает на компьютере очень длинное предложение. Курсор уже приблизился к концу строки, а девочка должна ввести ещё несколько слов. Что следует предпринять...
amid69 amid69  29.04.2020 10:28
Что такое гиперссылка в Word ? 1)Это ссылка в виде текста либо картинки, которая переводит нас в указанное ссылкой место 2)Это ссылка в виде заголовка 4)Это большой...
aantip aantip  29.04.2020 10:24
В чем заключается преимущество записи алгоритма на языке программирования в сравнении со словесным и графическим описания алгоритма?...
nargiska96p0c77t nargiska96p0c77t  20.11.2021 14:27
Внимательно прочитай фрагмент документа и ответь на вопрос, который расположен ниже текста. И в этом договоре, среди прочих статей, наш французский брат и его вышеназванный...

Популярные вопросы