Дано натуральное число n. Переставить первую и последнюю цифру числа n

@Viktor91 · Регистрация: 15.05.2012

Author24 — интернет-сервис помощи студентам

Дано натуральное число n. Переставить первую и последнюю цифру числа n.

@nnkut · 15.05.2012, 11:35

не очень корректно но так можно тоже

Pascal

str(n,s);
t:=s[1];
s[1]:=s[length(s)];
s[length(s)]:=t;
val(s,n,code);

Но можно и через div mod

@CodeR · 15.05.2012, 11:35

Pascal

Var n,k:integer;
    s:string;
    a:char;
Begin
    write('Введите число n: ');readln(n);
    Str(n,s);
    k:=Length(s);
    a:=s[k];
    s[k]:=s[1];
    s[1]:=a;
    Val(s,n,k);
    writeln('Полученное число: ',n);
    readln;
End.

@Viktor91 0 / 0 / 0 Регистрация: 15.05.2012 Сообщений: 8
		1
	Дано натуральное число n. Переставить первую и последнюю цифру числа n 15.05.2012, 11:28. Показов 6491. Ответов 2 Метки нет (Все метки) Дано натуральное число n. Переставить первую и последнюю цифру числа n. 0

	15.05.2012, 11:35

Дано натуральное число n. Переставить первую и последнюю цифру числа n

Решение