18 июня, 06:59

Составить программу чисел с поиском количества чисел в диапазоне от 40 до 60

+1
Ответы (1)
  1. 18 июня, 07:10
    0
    function isPrime (num: integer) : boolean;

    begin

    result : = num > 1? true : false;

    for var i : = 2 to (num div 2) do

    if (num mod i = 0) then

    begin

    result : = false;

    break

    end;

    end;

    begin

    var list : = new List;

    var (n, i) : = (40, 0) ;

    var count : = 0;

    while (n < 61) do

    begin

    if isPrime (n) then

    begin

    list. Add (n) ;

    count + = 1;

    end;

    n + = 1;

    end;

    list. Println;

    writelnFormat ('Count = {0}', Count) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Составить программу чисел с поиском количества чисел в диапазоне от 40 до 60 ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Новые вопросы по информатике
Составить программу которая вычетает значения вырожения y=x1/√2
Ответы (1)
Охарактеризуйте кратко топологию "шина", "звезда", "кольцо".
Ответы (1)
Дана матрица F (m*m) заменить нулями главную диагональ матрицы В С + + basic visual
Ответы (1)
Помогите написать слова: веб сайт, веб страница, провайдер, тэг, хостинг, гипер ссылка. На русском, понятном "человеческом" языке
Ответы (1)
Комплексная проверка - это
Ответы (1)
Перечислите все инструменты программы SketchUp ... ПО порядку действия
Ответы (1)
По каким признакам мы сравниваем реальные объекты? Выберите один ответ: по существенным признакам по количеству и качеству по размерам, цвету, форме
Ответы (1)
Написать программу с использованием оператора while в результате работы которой осуществляется вывод последовательности чисел 1 2 3 4 5
Ответы (1)
Три супружеские пары нижнекамцев: Ибрагимовы, Лутфуллины и Закировы - уселись за круглый стол, чтобы выпить по чашке чая. Справа и слева от каждой жены сидел мужчина, но ни один муж не сидел рядом со своей женой.
Ответы (1)
Юный программист Семён говорит, что никогда не пишет комментариев в программах, потому что это лишняя работа, а он и так все помнит. Согласны ли вы с ним?
Ответы (1)