Информатика, вопрос задал aleksandrasavenko344 , 2 года назад

Составить программу для решения следующей задачи. Определить, сколько двузначных чисел, которые не делятся на 4. Результат вывести на
экран.
Пожалуйста помогите
​

Ответы на вопрос

Ответил LRSM
1

PascalABC.NET:

!По школьной программе

  • var n: integer;
  • begin
  • for var i := 10 to 99 do
  • if i mod 4 <> 0 then n := n + 1;
  • writeln(n);
  • end.

!Не по школьной программе

  • begin
  • (10..99).Count(c -> c mod 4 <> 0).Print
  • end.
Приложения:
LRSM: Возможно... Поэтому я и прикладываю оба варианта. Просто не все школы могут такое себе позволить, поэтому большинство всё же остаются использовать старую программу чистого pascal. Вместо "for var i" учат сначала объявлять i, а потом уж в цикле писать и тому подобное, ну Вы сами прекрасно это знаете. Да, сейчас в скачке IT разработки многие школы перестраиваются, но далеко не все.
LRSM: Ладно-ладно, спасибо, вижу, не правильно выразился.
Предыдущий вопрос
Следующий вопрос
Новые вопросы