Есть ответ 👍

Даны число из пяти цифр найти наибольшее
в виде программы

182
241
Посмотреть ответы 2

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


PascalABC.NET 3.5.1 + .NET Framework 4.7.1

begin

 var A := ReadString().ToCharArray;

 A.ConvertAll(p -> char.GetNumericValue(p)).Max.Println;

end.

Python 3.7.2

number = [int(i) for i in list(input())]

print(max(number))


var

_counter, i : integer;

begin

for i := 100 to 999 do

if ((i mod 6 = 0) and (i mod 10 = 4)) then

_counter := _counter + 1;

writeln(_counter);

end.

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