Вход
Регистрация
О проекте Как заработать?
95

Найти все четные числа от 1 до 100 помогите

23 марта 2023

Найти все четные числа от 1 до 100 помогите

категория: информатика
ответить
в избранное



54

Uses crt; var i: integer; begin for i: =1 to 100 do if i mod 2=0 then write (i,'); end.

комментировать
в избранное отблагодарить
Знаете ответ?
Задайте свой вопрос


Смотрите также:
Сколько в байте бит? Помогите пожалуйста
Составить программу по задачеиз 3 целых чисел а, в, с найти меньшее (min)
Составите периметр комнаты прямоугольника на языке паскаль
Плииз) что такое файл?)
При интернет- соединении с максимальной скоостью передачи данных 192Кбит/с…
Продолжитепоследовательность, записав следующее число 0, 2, 24, 252, …
Сколькоцелых Мбайт потребуется для хранения звукового трека продолжительностью…
Запишите многоуровневый список на тему «поход"1. Документы 2. Одежда (верхняя…
Составьте программу которая позволяет закодировать строку путем замены всех…
27400
Алгебра
14821
Английский язык
14215
Биология
7368
Другой
719
Экономика
18828
Физика
8304
География
15850
Геометрия
5255
Информатика
11817
История
23331
Химия
15992
Литература
73118
Математика
8151
Обществознание
465
Правоведение
46271
Русский язык
Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...