Задать вопрос
21 ноября, 02:48

Циклы в языке программирования Pascal

Дано n целых чисел. Сколько из них являются нечётными?

+4
Ответы (1)
  1. 21 ноября, 03:34
    0
    Var

    A, n, k:integer;

    Begin

    Write ('n = ') ; ReadLn (n) ;

    Write ('Введите целые числа (', n,' шт.) : ') ;

    k:=0;

    For n: = 1 to n do

    Begin

    Read (A) ;

    if A mod 2 = 0 then k:=k+1

    End;

    WriteLn ('Кол-во чётных чисел: ', k)

    End.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Циклы в языке программирования Pascal Дано n целых чисел. Сколько из них являются нечётными? ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Похожие вопросы по информатике
Отметьте истинные утверждения о языках программирования: 1). Языки программирования бывают универсальными и специализированными. 2). Язык программирования Python - универсальный язык программирования. 3).
Ответы (1)
Как описывают переменные в Pascal? Какие стандартные числовые типы языка Pascal вам известны? Что вам известно о соответствии типов переменных в языке Pascal? Какие арифметические операции можно выполнять в Pascal?
Ответы (1)
Задание: 1) Перечислить виды циклов. 2) Конструкция цикла с параметром на языке программирования Pascal. 3) Известно ли число повторений в цикле с параметром? 4) Если известно, то указать формулу, по которой можно определить число повторений.
Ответы (1)
1) Вычислить длину окружности и площадь круга одного и того же заданного радиуса R. Pascal (желательно с блок-схемой) 2) Найти сумму членов арифметической прогрессии, если известны её первый член, знаменатель и число членов прогрессии Pascal
Ответы (1)
Для чего предназначены системные программирования? Для разработки каких типов программного обеспечения служат системы программирования? Кто может работать с системой программирования?
Ответы (1)