Предмет: Информатика,
автор: aleksandrasavenko344
Составить программу для решения следующей задачи. Определить, сколько двузначных чисел, которые не делятся на 4. Результат вывести на
экран.
Пожалуйста помогите
Ответы
Автор ответа:
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 разработки многие школы перестраиваются, но далеко не все.
Интересные вопросы
Предмет: Русский язык,
автор: Янусик23
Предмет: Русский язык,
автор: BarWhip
Предмет: Русский язык,
автор: Аноним
Предмет: Геометрия,
автор: лои2
Предмет: Математика,
автор: ПолинаShev