Question

Помогите с информатикой пожалуйста.

Дано натуральное число. Верно ли, что число принадлежит промежутку от А до В и кратно 3, 4 и 5. А и В задаются.

Нужно составить программу в , но не с условием (if...), а чтоб все решалось через циклы, где это возможно!
Может кто знает.

Answer 1

бред конечно, но вариант

var
    a, b, x: integer;

begin
    readln(a, b, x);
    while (x mod (3 * 4 * 5) = 0) and (x >= a) and (x <= b) do
    begin
        Writeln('да');
        halt;
    end;
    
    Writeln('нет');
end.