Есть ответ 👍

Дано целое число n найти самую максимальную цифру этого числа

257
417
Посмотреть ответы 2

Ответы на вопрос:


Var n,x,max: integer; begin readln(n); while n> 0 do   begin   x: =n mod 10;   if x> max then max: =x;   n: =n div 10;   end; writeln('максимальная цифра: ',max); end.
rayarybak
4,6(58 оценок)

Будьте людьми это хорошему человеку обуздать информатику.

Популярно: Информатика