Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
1993nnnn
18.10.2022 07:06 •
Информатика
Дан массив из 10 целых чисел. определите сколько элементов этого массива имеют значение 5
Показать ответ
Ответ:
Kaytha
10.09.2020 06:54
Program pr1;
Var A:array [1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do
read (A[i]);
k:=0;
for i:=1 to 10 do
if A[i]=5 then
k:=k+1;
writeln;
writeln (k);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
полинка20072
06.02.2023 01:15
Є повна посудина місткістю 8 літрів і дві порожні посудини місткістю 3літри і 5літрів. Скласти алгоритм одержання в одній з посудин 2 літри води....
casha0032
19.11.2022 12:42
Создать web-страницу на любую тему(в блокноте), содержащую форматированный текст, список (нумерованный или маркированный) и изображение...
sorokovilya
02.02.2022 15:46
Подсчитать число нулей и единиц в заданной матрице.(в матлаб)...
Samatova03
23.05.2021 08:03
на языке Си 1. Для каждой введенной цифры (0 - 9) вывести соответствующее ей название на английском языке (0 — zero, 1 — one, 2 — two, ...). выполнять только с использованием...
МудраяСоваАлександра
24.04.2022 16:09
С ++ Перегрузка операций Класс для обслуживания структур типа Очередь с приоритетами Создать класс PriorQueue для работы со структурами типа Очередь с приоритетами . Структура...
Bluka23
23.05.2022 00:06
KerЛЬ-риНІ. Урок 2 Определи количество используемых в программе датчиков.01B+C3TАА7575150Верный ответ:+ НазадПроверить...
dschunchewa2013
29.10.2020 12:06
Аралам силтеме деген не?...
olmilevskaya1
12.07.2021 15:15
Чому дорівнює опір стартера аатомобіля ,якшо при напрузі 12 в сила струму в нього дорівнює 600 а...
долин1
12.07.2021 15:15
Сколько различных простых делителей имеет число n =6 × 8 × 5 × 11 ?...
igor2312
12.07.2021 15:15
Gebrauchen sie die eingeklammerten verben im präteritum. 1. ich (verstehen) meine aufgabe gut. 2. wir (gehen) ins institut zu fuβ. 3. die mutter (kochen) heute morgen...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var A:array [1..10] of integer;
i,k:integer;
begin
for i:=1 to 10 do
read (A[i]);
k:=0;
for i:=1 to 10 do
if A[i]=5 then
k:=k+1;
writeln;
writeln (k);
end.