Напишите программу по паскалю. дано трехзначное натуральное число a. требуется определить, какая из его цифр большая. исходные данные: 835. результат: 8.

226

307

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

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

burtsevadianka

Информатика

4,4(79 оценок)

Var a,c,k,max,chislo: integer; begin readln(chislo); max: =-10; c: =1; repeat a: =chislo div 10 c: =c+1; until a=0; k: =10; for i to c do begin if (chislo mod k)> max then max: =(chislo mod k) chislo: =chislo mod k; end; writeln ( max); end.

Андрей11112222

Информатика

4,4(77 оценок)

орысша білмейиін кешір

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

Темы

Получить
полный доступ

150 000+ пользователей

Оформить подписку