Дано натуральное число. записать число, записанное теми же цифрами, но в обратном порядке. подсказка последовательно отделяемое каждую цифру, потом ее значение прибавляем к переменной s, умноженной на 10.
176
181
Ответы на вопрос:
Pascal abc program perevod; uses crt; var a,i,error: integer; s,d: string; begin write( 'введите число: '); readln(a); str(a,s); for i: =1 to length(s) do d: =s[i]+d; val (d,a,error); write( 'ответ: ',a); end.
pascalabc.net
begin
var a : = readseqintegerwhile(p -> p < > 0).toarray;
a.count(p -> (p mod 5 = 0) or (p mod 9 =
end.
Популярно: Информатика
-
dlyaigrmoih101.11.2022 03:40
-
Ботакан1706.02.2023 14:16
-
lizcarpova29.11.2022 22:49
-
Zhuravl22024.05.2023 22:27
-
Руфина15704.02.2022 17:58
-
Trinogie18.01.2020 02:22
-
KsKitty09.07.2022 22:27
-
karmen200411.06.2020 04:26
-
пороло115.01.2023 06:09
-
dariadariadaria224.01.2022 01:13