Составьте программу вычисления количества двузначных чисел,которые кратны 2 и3

Ответы:
Ростислав Забаев
05-08-2015 06:02

var i, n: integer;begin   for i := 10 to 99 do      if (i mod 2 = 0) and (i mod 3 = 0) then          n := n + 1;   writeln(n);   // Или так:   writeln((99 div 6) - Int(10 / 6));end.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Евгений Михайловский

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Составьте программу вычисления количества двузначных чисел,которые кратны 2 и3» от пользователя Евгений Михайловский в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!