Если надо вывести получившееся число без ведущих нулей (т.е. 1000 превратить в 1), то можно так: var n: integer; begin readln(n); writeln(1000 * (n mod 10) + (n - (n mod 10) - 1000 * (n div 1000)) + n div 1000) end. если надо сохранять ведущие нули, то можно, например, считать число посимвольно. var i: integer; c: array[1 .. 4] of char; t: char; begin for i : = 1 to 4 do read(c[i]); t : = c[1]; c[1] : = c[4]; c[4] : = t; for i : = 1 to 4 do write(c[i]) end.
whitewhit90
04.03.2022
А) по алфавиту: слова по алфавиту с а до я или наоборот список учеников, наименование товаров в магазине, список песен, и т.д, и т.п. словарь является ярким примером такой сортировки. б) в порядке убывания числа- по возрастанию или убыванию. товары по их количеству, альбомы по количеству песен в них, города по количеству проживающих в них людей конституция рф – сортировка по номерам статей в порядке убывания. в) в хронологической последовательности даты- по возрастанию или убыванию сортировка: по дате рождения учеников, по дате поступления товаров на склад, списка песен по дате их записи. учебник по : хронология событий.
borisov
04.03.2022
Фрактальная графика, также как векторная и трёхмерная, является вычисляемой. её главное отличие в том, что изображение строится по уравнению или системе уравнений. поэтому в памяти компьютера для выполнения всех вычислений, ничего кроме формулы хранить не требуется. только изменив коэффициенты уравнения, можно получить совершенно другое изображение. эта идея нашла использование в компьютерной графике компактности аппарата, необходимого для ее реализации. так, с нескольких коэффициентов можно задать линии и поверхности сложной формы.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Дано 4 значное число, поменять местами первую и последнюю цифру. программирование, составить в паскале