Является ли число палиндромом, если количество цифр в числе больше 10

@Daulet97 · Регистрация: 10.10.2012

1) Составить алгоритм является ли число полиндромом, если кол-во цифр в числе больше 10
2)Решение кубического уравнения.
3)Нахождение максимального числа из 20 чисел
Заранее спасибо

@condor · 22.11.2012, 14:36

Нахождение максимального числа из 20 чисел:

Delphi

var 
  a,b,c,max:integer;
begin
  read(a,b,c);
  if a > b then 
    max:=a
  else
    max:=b;
  if max > c then 
    write(max)
  else
    write(c);
end.

Тут примерчик нахождения 3 чисел.

Составить алгоритм является ли число полиндромом, если кол-во цифр в числе больше 10:

Delphi

Var a,b,c:integer;
Begin
Write('введите  число');
Readln(a);
If (a div 100)>(a mod 10) then writeln (' это палиндром ')
Else Writeln(' это не палиндром');
End.

Конечно же примерчики похожие и по ним можно сделать.

@Daulet97 0 / 0 / 0 Регистрация: 10.10.2012 Сообщений: 11
		#1
	Является ли число палиндромом, если количество цифр в числе больше 10 21.11.2012, 18:06. Просмотров 493. Ответов 1 Метки нет (Все метки) 1) Составить алгоритм является ли число полиндромом, если кол-во цифр в числе больше 10 2)Решение кубического уравнения. 3)Нахождение максимального числа из 20 чисел Заранее спасибо 0

Опции темы