Примеры задач

Строки символов

Cоставить программу вывода самой большой цифры заданного числа.

Методика решения

Используемые переменные:
а - строка;
в - символ;
i – переменная цикла.

Для начала считываем с экрана строку (число).

Нахождение самой большой цифры числа: присвоим переменной b значение ‘0’ , затем сравниваем его с остальными символами строки, если найдется символ, меньший b , то b присваиваем значение этого символа, выводим b на экран.

Листинг программы

Program ex4_2;

Uses crt;

Var i,j:integer;a:string[10];b:char;

Begin

Clrscr;

Writeln('введите число');

b:='0';

Readln(a);

For i:=1 To length(a) Do

If bWriteln('наибольшая цифра данного числа ',b);

Readkey;

End.

Запустить программу

Назад