Задать вопрос
1 октября, 00:33

Подсчитать количество целых чисел среди чисел a, b, c.

+3
Ответы (1)
  1. 1 октября, 03:21
    0
    var

    a, b, c : real;

    count : byte;

    begin

    read (a, b, c) ;

    count : = 0;

    if frac (a) = 0 then inc (count) ;

    if frac (b) = 0 then inc (count) ;

    if frac (c) = 0 then inc (count) ;

    writeln (Count) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Подсчитать количество целых чисел среди чисел a, b, c. ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1) Составить массив из 10 целых чисел, вывести его на экран и подсчитать количество элементов массива, значения которых не превышают трех 2) Составить массив из 10 целых чисел и вывести его на экран, подсчитать сумму отрицательных и положительных
Ответы (1)
1) В диапазоне от 0 до 100 подсчитать количество чисел оканчивающихся на 3. 2) В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
Ответы (1)
Подсчитать количество строк заданной целочисленной матрицы N*N, являющихся перестановкой чисел 1,2, ..., N (вообщем нужно подсчитать кол-во строк в которых числа не повторяются) за полноценное решение 34 пенкта.
Ответы (1)
Сформировать целочисленный массив 20 элементов. 1) Подсчитать количество положительных элементов. 2) Подсчитать сумму нечетных элементов.
Ответы (1)
Дан целочисленный массив из 7 элементов: 1) подсчитать произведение элементов массива кратных 5 и кратных 3. 2) подсчитать среднее значение четных элементов массива.
Ответы (1)