СРОЧНО!!!Напишите функцию в Паскале,которая "разворачивает" десятичную запись числа

Question

Безотлагательно!!!Напишите функцию в Паскале,которая "разворачивает" десятичную запись числа наоборот,к примеру,из 123 выходит 321,а из 3210-0123

1 ответ

, оставишь ответ?

Имя:*

E-Mail:

Похожие вопросы

Егор Перескокин · Answer 1 · 2019-08-08 05:35:45+3:00

Егор Перескокин 2019-08-08 05:35:45

Var
l,i:longint;
S:String;
begin
Read(S);
l:=length(S);
For i:=l downto 1 do Write(S[i]);
end.

Миха 2019-08-08 05:45:18

не работает

Леонид Клименчев 2019-08-08 05:53:41

какие оплошности

Николай Мосалкин 2019-08-08 06:02:48

Function F(y:longint):longint;var x:longint;begin x:=0; While x=0 do x:=random(6); F:=x;end;begin randomize; Writeln(F(1),' ',F(2));end.

Карина Канаева 2019-08-08 06:05:44

сам проверил

Артемий Финешин 2019-08-08 06:10:31

работает

Марина Кяршева 2019-08-08 06:17:05

спасибо огромное еще раз))

Тамара Насибегова 2019-08-08 06:25:02

спасибо в кармашек не положишь)))

Колгдиев Пашка 2019-08-08 06:27:55

безмятежной ночи

Амулова Кристина 2019-08-08 06:35:58

благотворительностью тоже время от времени полезно заниматься)

Timur Villevskij 2019-08-08 06:37:40

смирной ночи