Задать вопрос
16 декабря, 11:51

С клавиатуры вводятся два натуральных числа N и K (0
Пример входных данных: 2 5

Пример выходных данных: 10

+4
Ответы (1)
  1. 16 декабря, 13:34
    0
    Var

    simple: array[1 ... 10000] of integer;

    i, j, a, b, simple_n, s: integer;

    is_simple: boolean;

    begin

    read (a, b) ;

    for i : = 2 to b do begin

    is_simple : = true;

    for j : = 1 to simple_n do

    is_simple : = is_simple and (i mod simple[j] 0) ;

    if is_simple then begin

    simple_n : = simple_n + 1;

    simple[simple_n] : = i;

    writeln (i) ;

    if i > = a then s : = s + i;

    end;

    end;

    writeln (s) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «С клавиатуры вводятся два натуральных числа N и K (0 ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы