написать программа выводу на экран всех 3 значных чисел,кратных 6 и 4, и заканчивающихся на цифру 8. Программу писать тремя способами с использованием циклов for, while, repeat

Есть ответ
17.12.2022
472

Ответ


Program Help;Var i : Word;Begin(* 1 способ *)For i := 100 to 999 do If (i mod 6 = 0) and (i mod 4 = 0) and (i mod 10 = 8) then Writeln(i);Writeln;(* 2 способ *)i := 100;While i < 999 do Begin If (i mod 6 = 0) and (i mod 4 = 0) and (i mod 10 = 8) then Writeln(i); i := i + 1; End;Writeln;(* 3 способ *)i := 100;Repeat If (i mod 6 = 0) and (i mod 4 = 0) and (i mod 10 = 8) then Writeln(i); i := i + 1;Until i = 999;Readln;End.


Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
17.12.2022
Этот сайт использует cookies (Политика Cookies). Вы можете указать условия хранения и доступ к cookies в своем браузере.