Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.65/40: Рейтинг темы: голосов - 40, средняя оценка - 4.65
Vikysi08
0 / 0 / 0
Регистрация: 13.04.2011
Сообщений: 4
1

Написать программу, которая меняет з записи числа первую и последнюю цифру местами

13.04.2011, 20:36. Просмотров 7774. Ответов 2
Метки нет (Все метки)

Задача на функцию.Написать программу, которая меняет з записи числа первую и последнюю цифру местами. Полученное число вывести на экран.

Добавлено через 25 секунд
помогите,пожалуйста
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.04.2011, 20:36
Ответы с готовыми решениями:

Программа, которая меняет местами первую и последнюю цифры числа
Программа которая меняет местами первую и последнюю цифры числа

Напишите программу, которая выводит на экран первую цифру целого числа
Дано двухзначное целое число . Напишите программу , которая выводит на экран...

Составьте программу, которая в записи натурального числа N меняет местами крайние цифры
задание -Составьте программу, которая в записи натурального числа N меняет...

Первую и последнюю цифры в записи числа поменять местами
1. Дано натуральное число x. Первую и последнюю цифры в записи числа поменять...

Написать программу, которая меняет местами в файле четные и нечетные слова
Помогите,пожалуйста! Создать текстовый файл с произвольным содержимым....

2
magirus
13.04.2011, 20:37
  #2
 Комментарий модератора 
называйте темы информативно
0
Puporev
Модератор
55464 / 42571 / 29422
Регистрация: 18.05.2008
Сообщений: 100,712
14.04.2011, 11:06 3
Лучший ответ Сообщение было отмечено Vikysi08 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
uses crt;
var n,m,c1,cp:integer;
    k,i:byte;
begin
write('n=');readln(n);{например 12345}
cp:=n mod 10;{последняя цифра=5}
n:=n div 10;{число без последней цифры=1234}
m:=n;{запомним его}
k:=0;
while m>9 do{пока не останется 1 цифра}
 begin
  m:=m div 10;{первая цифра=1}
  k:=k+1;{количество разрядов без первого=4}
 end;
c1:=m;{запомним первую цифру=1}
for i:=1 to k do
 begin
  m:=m*10;{повышаем разряд числа, равного первой цифре=1000}
  cp:=cp*10;{повышаем разряд последней цифры=5000}
 end;
n:=(n-m)*10+c1+cp*10;{получаем число=(1234-1000)*10+1+5000*10=52341}
writeln('n2=',n);
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.04.2011, 11:06

Создать файл целых чисел. Поменять местами первую и последнюю цифру
Создать файл целых чисел. Поменять местами первую и последнюю цифру.

Найти первую цифру , последнюю цифру, количество цифр и сумму цифр числа
Дано натуральное число n. Найти первую цифру , последнюю цифру, количество...

Написать программу, которая в массиве случайных чисел С[1.5,1.5] меняет местами значения элементов главной и вспомогательной диагонали
Написать программу, которая в массиве случайных чисел С меняет местами значения...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru