tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
(паскаль) разработайте программу,
(паскаль) разработайте программу, определяющую количество нечётных чисел в целочисленном массиве из 17 элементов. массив заполнить любым и вывести на экран в одну строку
inessa2012
1 05.07.2019 07:20
0
Ответы
генетика2
28.07.2020 20:10
Var
a:array[1..17] of longint;
n,i,j:longint;
begin
For i:=1 to 17 do
begin
Read(a[i]);
if odd(a[i]) then inc(n);
end;
writeln(n);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
AngelinaMon
03.04.2022 13:20
100111010010011110001111000111010000100 запишите в виде ip адреса компьютера в виде четырёх десятичных чисел, разделённых точками...
denis20043601
19.05.2020 08:26
Запиши развёрнутую запись числа 0,566 для дробной части числа позя...
serdykivka
19.05.2020 08:26
Фото**выполните следующими фрагменты...
fsks
19.05.2020 08:26
с тестом 1. Дано описание массива: const a : array[1..4] of integer = (12,9,63,109); Верно ли описан массив? * 1)неверно 2)верно 2. Определи заполнения массива. randomize;...
sveta6729
08.04.2021 19:39
Выберите из списка одно из направлений: — банковская сфера; — операторы связи; — интернет-компании; — образование; — сфера услуг; — торговля. Выполните исследовательскую...
elenanovikova21
08.04.2021 19:46
с решением . в нашей школе не было информатики целый гребанный год, поэтому надеюсь на объяснение большое за )...
Алёксейudfih
08.04.2021 19:46
Составить программу, которая по данной последовательности n целых чисел выводит на экран только те, которые кратны 3....
ksenia20015
08.04.2021 19:46
Чему равен x, если все запросы выполнялись практически одновременно, т. е. во время выполнения запросов набор страницы, содержащих все искомые слова, не изменился , умоляю...
gushagusha
08.04.2021 19:47
Створіть проект, у якому можна буде обчислити значеня функції y={15-3x, якщо -1 меньше х меньше 4, { 6+4х, для всіх інших х....
AmmosD
08.04.2021 19:51
Проект рисования светофора в среде программирования Python. Координаты начальной точки - (-50, 350). Прямоугольник имеет размеры 120 х 360 Створити проект малювання світлофора...
Популярные вопросы
ПОМАГИТЕ Дайте полный ответ на во Какой вы представляете лягушку лягушка-путешественница...
2
Употребите present simple или present continuous. 1. He (get) up at...
1
Напиши сочинение на тему «Вид из окна» (пиши о весне)...
3
Точка движется прямолинейно по закону x (t) = t³ + 2t² +11. (Перемещение...
1
Укажите элемент, для которого характерно такое распределение электронов:...
2
БУДУЩЕЕ ВРЕМЯ I Напишите предложения в будущем времени. 1. Die Mutter...
2
Подготовьте сообщение «Герои индустриальной революции» (Соберите информацию...
2
З розчину цукру масою 300г з масовою часткою розчиненої речовини 6%...
1
Яку силу F треба прикласти щоб підняти вантаж масою 70 кг за до блока,...
3
Укажіть прислів’я, які відповідають ідейному змісту твору В.Чемериса...
2
a:array[1..17] of longint;
n,i,j:longint;
begin
For i:=1 to 17 do
begin
Read(a[i]);
if odd(a[i]) then inc(n);
end;
writeln(n);
end.