Объяснить как работает программа, , program zinaida; const n=5; var i,k: integer; instring: string; isize,count: integer; begin repeat write('string: '); readln(instring); k: =length(instring); if instring[k]='.' then dec(k); for i: =1 to k do begin if instring[i]< > ' ' then inc(isize); if (instring[i]=' ') or (i=k) then begin if isize=5 then inc(count); isize: =0; end; write('количество слов из пяти букв',count); end.

106

481

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

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

santa34

Информатика

4,8(83 оценок)

Программа подсчитывает количество слов длиной в 5 символов во введенном тексте. но работать она не будет, есть ошибки: 1. встречен repeat но нет until 2. есть 3 begin, но только 2 end 3. константа n лишняя. нигде в программе не используется после исправления ошибок программа с краткими комментариями будет выглядеть так: program zinaida; var i, k: integer; instring: string; isize, count: integer; begin write('string: '); readln(instring); //ввод текста k : = length(instring); //длина текста if instring[k] = '.' then dec(k); //цикл для поиска пробелов и //слов с длиной 5 символов for i : = 1 to k do begin if instring[i] < > ' ' then inc(isize); if (instring[i] = ' ') or (i = k) then begin //если длина слова = 5 то увеличиваем count на 1 if isize = 5 then inc(count); isize : = 0; end; end; write('количество слов из пяти букв', count); end.

krut2202

Информатика

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

Const nx=30; var i,j,n,m,q,r: integer; a: array[1..nx,1..nx] of integer; d,sn,min: real; begin write('введите размер массива '); readln(n); min: =100; for i: =1 to n do begin for j: =1 to n do begin a[i,j]: =random(100)-2; write(a[i,j]: 4); m: = m + a[i,j]; end; writeln; end; sn: = m/n/n; write(m: 9,sn: 9: 4); writeln; for i: =1 to n do begin for j: =1 to n do begin d: =abs(sn - a[i,j]); if d < min then begin r: =i; q: =j; min : = d; end; end; end; write(a[r,q]: 4,r: 4,q: 4); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

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

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.