Определить, сколько фамилий в списке состоят из 8 или 9 букв. (тема: строковый тип данных)
Ответы на вопрос:
как по мне то лучше удобство и ничего лишнего, ведь список сохранять не говорили
var s: string;
k: integer;
begin repeat write('введите фамилию: '); readln(s); if (length(s)=9) or (length(s)=8) then
k: =k+1 until s=''; {прекращаем чтенье если нам посылают пустую строку} writeln(k); end.
это без использования файлов
var spisok: array [word] of string; {объявляем массив для хранения фамилий} n,i,k: word; {n - количество фамилий,i - переменная, k - количество фамилий в списке равных 8 или 9 буквам}
beginwrite('введите количество фамилий в списке n = '); readln(n); for i: =1 to n do beginwrite('введите фамилию ',i,' : '); readln(spisok[i]); if (length(spisok[i])=9) or (length(spisok[i])=8) then inc(k); {inc(k) - это тоже самое ,что k: =k+1; }end; writeln('количество фамилий в списке состоящих из 8 или 9 букв = ',k); end.
п.с. если вам потребуется,обработка конкретно через фаил напишите мне, так как в условии вы не указали точно через что!
1. Подпрограмма (англ. subroutine) — поименованная или иным образом идентифицированная часть компьютерной программы, содержащая описание определённого набора действий. Подпрограмма может быть многократно вызвана из разных частей программы.
Объяснение:
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
ArseniyZnanija22.03.2021 14:09
-
maltsevaalbina200606.02.2020 09:22
-
kristavikown6tn26.04.2022 10:57
-
Dimaj12.12.2022 16:26
-
melesineduard28.07.2022 16:14
-
alina17anilaalina24.11.2021 17:02
-
cwqfqeggqeg19.05.2021 00:32
-
ket17403.08.2021 21:53
-
елена181008.04.2020 21:05
-
akkiekim03.04.2022 13:23
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.