Проверка кода

@Depressa · Регистрация: 26.11.2011

Студворк — интернет-сервис помощи студентам

JavaScript
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional....;
<html xmlns="http://www.w3.org/1999/xhtml"; xml:lang="en" lang="en">
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
 <title>Page1</title>
 <script type="text/javascript">
 function abr(s)
 {
 var t, vol=1, r=0, i=0, k=0;
 document.write("Dlina: "+s.length);
 document.write("<br/>");
 
 t=s.length;
 
 for(var i=0; i<=t; i++)
 {
 r=s.charAt(i);
 if(r==s.charAt(i+1))
 {
 vol=vol+1;
 }
 else if(vol>1)
 {
 
 document.write(r+": "+vol); 
 document.write("<br/>"); 
 vol=1;
 k++;
 }
 } 
 
 document.write("Kolichestvo simvolov: "+k); 
 document.write("<br/>"); 
 document.write("Stroka: "+s);
 document.write("<br/>");
 }
 </script>
 </head>
 <body>
 <form>
 <input type="text" id="f1" /><br />
 <input type="button" value="Send" onclick="abr(document.getElementById('f1').value);"/>
 </form>
 </body>
</html>

Проверьте на адекватность код

Само задание "Вводится строка произвольной длины. Определить кол-во одинаковых подряд стоящих символов. Вывести исходную строку+ результат обработки."

Заранее спасибо.

@Воваша · 15.05.2012, 20:10

Depressa, по-моему отлично, только пожелание:выводите не очищая документ, а, например, в div-блок.

@Depressa · 15.05.2012, 20:16 **[ТС]**

Сообщение от Воваша

Depressa, по-моему отлично, только пожелание:выводите не очищая документ, а, например, в div-блок.

Ещё бы знать, как это сделать?(

@Воваша · 15.05.2012, 20:24

У вас ошибки в подсчётах. В JS не разбираюсь, увы, исправить не смогу...

HTML5
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional....;
<html xmlns="http://www.w3.org/1999/xhtml"; xml:lang="en" lang="en">
 <head>
 <meta http-equiv="Content-Type" content="text/html; charset=utf-8"/>
 <title>Page1</title>
 <script type="text/javascript">
 function abr(s)
 {
 var t, vol=1, r=0, i=0, k=0;
 //document.write("Dlina: "+s.length);
 //document.write("<br/>");
 
 t=s.length;
 
 for(var i=0; i<=t; i++)
 {
 r=s.charAt(i);
 if(r==s.charAt(i+1))
 {
 vol=vol+1;
 }
 else if(vol>1)
 {
 
 //document.write(r+": "+vol); 
 //document.write("<br/>"); 
 vol=1;
 k++;
 }
 } 
 
 document.getElementById('vovashanoob').innerHTML='<br>'+r+': '+vol+'<br>Длина: '+s.length+'<br>Количество символов: '+k+'<br/>Строка: '+s+'<br/>'; 
 }
 </script>
 </head>
 <body>
 <form>
 <input type="text" id="f1" /><br />
 <input type="button" value="Send" onclick="abr(document.getElementById('f1').value);"/>
<span id="vovashanoob" style="background-color:#c0c0c0; color:#000000;font-weight:bold"></span>
 </form>
 </body>
</html>

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .

@Воваша 26 / 26 / 2 Регистрация: 10.05.2012 Сообщений: 120
	15.05.2012, 20:10
	Depressa, по-моему отлично, только пожелание:выводите не очищая документ, а, например, в div-блок. 1