даны 3 строки. определить в какой строке чаще встречаются цифры.
5-9 класс
|
var
x, y, z, i : integer;
s : string;
begin
x := 0; y := 0; z := 0;
readln (s);
for i := 1 to length (s) do
if s[i] in ['0'..'9'] then x := x + 1;
readln (s);
for i := 1 to length (s) do
if s[i] in ['0'..'9'] then y := y + 1;
readln (s);
for i := 1 to length (s) do
if s[i] in ['0'..'9'] then z := z + 1;
Дальше лень писать, в x, y, z хранится количество цифр в каждой строке, дальше просто найти максимум и вывести.
Другие вопросы из категории
полное имя D:\2013\Осень\Хризантема.doc. В этом каталоге создали
подкаталог Ноябрь и файл Хризантема.doc переместили в созданный
подкаталог. Укажите полное имя этого файла после перемещения.
Дано:
N=64 симв.
K=x*30*6
I=8775
Найти:x(кол-во символов в одной строке
разных специальностей: летчик, танкист, артиллерист, минометчик, сапер и связист. Определите специальность и звание каждого из шахматистов по следующим данным:
1) в первом туре лейтенант выиграл у летчика, майор — у танкиста, а сержант — у минометчика;
2) во втором туре капитан выиграл у танкиста;
3) в третьем и четвертом турах минометчик из-за болезни не участвовал в турнире, поэтому свободными от игры оказались капитан и ефрейтор;
4) в четвертом туре майор выиграл у связиста;
5) победителями турнира оказались лейтенант и майор, а хуже всех выступил сапер.
Читайте также
1. Сначала вторая строка пуста
2.Затем каждый символ первой строки от первого до последнего приписывается к создаваемой(второй) строке слева , если это гласная буква и ее позиция в исходной строке была нечетной , или если это согласная буква и ее позиция была четной. Во всех остальных случаях очередной символ первой строки приписывается ко второй строке справа . По этому алгоритму строка ВОЦА превратилась в строку ОВЦА .
А какая строка превратилась в строку ИНАВОРИГОРПРАМЕ ??
ББУДУ ОЧЕЕЕЕНЬ БЛАГОДАРНА
(1 строка информатика
2 строка два прилагательных
3 строка три глагола
4 строка фраза, несущая определённый смысл
5 строка вывод в одном слове)
Стоки не должны рифмоваться