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

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


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.

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






Назад

Закрыть