1.На вход программе даётся число N и N чисел (все натуральные меньше 10000).Нужно вывести то число, в котором наименьшее количество цифр.Если таких чисел несколько, вывести любое из них.Примеры: 4 123 24 167 8762 = больше 24;...
1.На вход программе даётся число N и N чисел (все натуральные <10000).
Нужно вывести то число, в котором наименьшее количество цифр.
Если таких чисел несколько, вывести любое из них.Примеры: 4 123 24 167 8762 => 24; 5 13 4 16 100 8 => 42.Программа должна вывести все четырёхзначные числа, которые являются палиндромами (т.е. читаются одинаково справа налево и слева направо).
Пример: 1001 1111 1221 1331 ... 9889 9999
Гость
Ответ(ы) на вопрос:
ГостьЗадача 1.
var
n, i, lmin, a, min: integer;
begin
readln(n);
lmin:=32000;
for i:=1 to n do
begin
read(a);
if length(inttostr(a))
Не нашли ответ?
Похожие вопросы