Найти количество четных чисел от 1 до 100, программа Pascal abc

69

Найти количество четных чисел от 1 до 100, программа Pascal abc

категория: информатика

ответить

в избранное

69

priemnik

14 марта 2023

var i,n: integer; begin n: =0; for i: =1 to 100 do if (i mod 2=0) then inc (n); writeln (n) end.

пользователи выбрали этот ответ лучшим

комментировать

в избранное ссылка отблагодарить

Знаете другой ответ?

Задайте свой вопрос

Смотрите также:

Сканируется цветное изображение размером 2 x 2 дюйма

Музыкальный диск стоит x рублей n копеек. У вас а рублей. Хватит ли денег на покупку диска?

Переведите на английский язык только нормально слова информатика)

В оранжерее были срезаны гвоздики: белых и розовых — 400 штук, розовых и красных — 300, белых и красных…

Рассчитайте объем видеопамяти необходимой для сохранения графического изображения занимающего экран монитора…

Саша, Дима и Маша измеряли на кануне нового года свой…

Составить программу в паскале которая вычисляет день недели по номеру (1-понедельник,2-вторник…

Как набрать 6 л воды с помощю 9-литрового и 4-литрового сосудов?

На берегу реки стоит крестьянин с лодкой, а рядом с ним — волк, коза, капуста

27400

14822

Английский язык

14216

Биология

7369

720

Экономика

18829

8304

География

15850

Геометрия

5255

Информатика

11818

23332

15992

Литература

73118

Математика

8152

Обществознание

466

Правоведение

46271

Русский язык

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!

Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!

Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...