• 19 October 2017
    • Литература
    • Автор: Dinara2921

    Задумано некоторое число х (х<100). Известны числа k,m,n - остатки от деление этого числа на 3, 5, 7. Решите задачу через repeat until

    • Ответ оставил: Leraps1
    Var x,k,m,n:integer;beginreadln(k,m,n);x:=0;repeatx:=x+1;until (x mod 3 = k)and(x mod 5 = m)and(x mod 7 = n)and(x<100);if x<100 then writeln(x) else writeln('Ошибка вв...
    • НЕ НАШЛИ ОТВЕТ?
    Если вас не устраивает ответ или его нет, то попробуйте воспользоваться поиском на сайте и найти похожие ответы по предметы...

Последние опубликованные вопросы