Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
svetasan76
27.02.2022 06:49 •
Информатика
Составить программу.дан массив,состоящий из 5 элементов.найти кол-во элементов равных 7.числа 7,14,-3,7,0.
Показать ответ
Ответ:
theslomsmon
02.10.2020 04:14
Var
a : array [1..100] of longint;
k,i : longint;
begin
k:=0;
for i:=1 to 5 do begin read(a[i]); if a[i]=k then k:=k+1; end;
writeln(k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
video252
21.10.2022 23:01
Дайте решение. к данному массиву был применен следующий алгоритм: ...
Maryyy100
20.02.2020 12:57
Для окружности радиуса r с центром в начале координат вывести точки, расположенные в узлах координатной плоскости, которые она охватывает полностью (узел координатной...
Queen102938
12.02.2023 18:19
Дед мороз за час до нового года запрег восьмерку оленей.порядок ему не понравился, он переставил оленей всеми возможными вопрос: насколько опоздал дед мороз с подарками?...
sochiru2014
12.10.2020 16:59
Наидите в тексте предложения свящанные картинами опишите санского коня используйте антонимы И...
rudnevskaya2004
12.10.2020 16:59
Для какого из приведённых имён истинно высказывание: (Первая буква согласная) И НЕ (Последняя буква гласная) И (Пятая буква гласная)? Варианты ответов : а)Иван б)Михаил...
LolGameHD
12.10.2020 16:59
Почему политика коллективизации привела к {великому бедствию}?...
Попова1234
12.10.2020 16:59
У каких насекомых 4 этапа развития? ...
Muhamed2005
18.06.2020 18:26
нужно сделать уже все сдали ...
Виктория708
17.10.2020 00:33
Fill in the shop or service. You can buy flowers there...
gr1mez
12.03.2021 22:38
Графическое представление движения. На рисунке представлен график изменения скорости при движении тела A. Укажите характер движения на участке 0-4 с (равномерное, равнозамедленное,...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a : array [1..100] of longint;
k,i : longint;
begin
k:=0;
for i:=1 to 5 do begin read(a[i]); if a[i]=k then k:=k+1; end;
writeln(k);
end.