Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
Arino4ka7381
12.06.2022 19:38 •
Информатика
Прочитать с экрана 30 имен, сосчитать сколько среди них имен петя . замечание-использовать только 3 переменных. abc a-текущ имя(строковый) b-переменная(кол-во имен петя) с-переменная(цель-сколько всего имен)
Показать ответ
Ответ:
МаринаДоблер
07.10.2020 05:54
Решение на паскале:
var
a: string;
b, c: byte;
begin
b := 0;
c := 0;
for c := 1 to 30 do
begin
readln(a);
if a = 'Петя' then b := b + 1;
end;
write(b);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
innaalekseenko1
14.09.2022 05:44
Пусть видеопамять компьютера имеет объем 512 Кбайт. Размер графической сетки – 640 х 480. Сколько страниц экрана одновременно разместится в видеопамяти при палитре...
vladysa20055
03.06.2020 09:05
Итоговая работа по теме Обработка текстовой информации : Реферат История вычислительной техники . Материал для реферата на ресурсе http://www.lbz.ru/metodist/authors/informatika/3/eor7.phpРеферат...
Teddy62711
03.12.2022 22:16
Определи, что является надсистемой, выбрав верный ответ. дом стена/ крыша\ \фундамент варианты ответа дом квартира нет правильного варианта ответа стена...
Евус1111
14.03.2020 09:41
Выясни сколько можно построить разных цепочек длины з...
jane2284p08aoc
24.08.2021 04:32
Дйте ссылку на бесплатный фотошоп, без вирусов....
alexlol228
11.02.2023 12:58
Какие блоки используются в линейном и разветвляющемся алгоритмах?...
Strellerts
30.11.2020 05:16
дана последовательность чисел заканчивающихся нулём. создайте программу, которая вычисляет сумму чисел без использования цикла ...
SuperSwino
22.06.2021 15:00
З вязок між номером групи елементу та кіл-тю електронів на зовнішньому енергетичному рівні атома...
timofeyfrol
22.06.2021 15:00
Вассал моего вассала не мой вассал это значит что 1)вассал не мог быть синдром другого вассала 2)сеньор не мог быть вассалом другого сеньора 3)сеньор не мог требовать...
Viviccompany
19.11.2022 01:35
Нарисовать 3 триугольника острый тупой я прямой обозначить углы и подписать...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a: string;
b, c: byte;
begin
b := 0;
c := 0;
for c := 1 to 30 do
begin
readln(a);
if a = 'Петя' then b := b + 1;
end;
write(b);
end.