сервис вопросов и ответовНайти количество чётных чисел от 1 до 100,программа Pascal abc
5-9 класс|
|
Mskatyad
31 янв. 2015 г., 0:09:04 (9 лет назад)
Kocehoc
31 янв. 2015 г., 1:26:29 (9 лет назад)
var i,n:integer;
begin
n:=0;
for i:=1 to 100 do
if (i mod 2 = 0) then inc(n);
writeln(n)
end.
Ответить
Другие вопросы из категории
Выберите верное обозначение чтроки в электронной таьлице
1)16H 2)Т7 3)78 4) AN
Выберите верный адрес ячейки в электронной таблице
1)64Е 2)АЛ3 3)К33 4)S3B
какая из приведенных файлов будут найдены если в поиске задать маску *зим?*.???
1)ЗимнийДень.txt
2)Winter - зима.wav
3)Зимушка.mpeg4
4)Я_зимой.gif
Помогите пожалуйста с ИВТ: 1.Случайным образом генерируется N целых чисел в диапазоне от -5 до 5. Посчитать сколько среди них положительных,
отрицательных, и не равных нуля. Задача решается через Turbo Pascal
Читайте также
Составить программу, которая выводит на экран в обратном порядке нечетные числа от 29 до 1 в Pascal ABC.
Составить программу,которая выводит на экран сумму нечетных чисел от 1 до 30 в Pascal ABC.
1)Составить программу нахождения суммы квадратов чисел от 25 до 125.
2) составить программу нахождения чисел от 10 до 99 сумма квадратов которых кратна 13 (mod=0)
3) найти сумму всех целых нечетных чисел меньших 100
4) найти сумму чисел в диапазоне от A до B кратных четырём. Числа А и В вводятся с клавы.
5) Найти все натуральный делители натурального числа n
1.Найти произведение всех целых чисел от а до 100 (а<100) кратных 17,но не кратных 2 2.Вычислите: 98+96+94+92+90+88+,,,,,+6+4+2
3.Определить и вывести на экран количество трехзначных чисел,которые делятся без остатка на 5 и 21 одновременно.
4.спортсмен пробежал в 1-ый день тренеровки расстояние 10 км. В каждый следующий день он робегал на 3 км больше ,чем в предыдущий. Определить Суммарное расстояние.
5. в Пионерском лагере n отрядов с различным количеством детей. Сколько всего детей в пионерском лагере?
Даны два целых числа А и В (А < В) . Найти произведение всех целых чисел от А до В включительно.
Входные данные: ввести два целых числа А,В (1 <=А,В<=10).
Входные данные: вывести произведение всех целых чисел от А до В включительно.
задача 1. Дано натуральное число n. Напишите программу выводящую на экран последовательность натуральных чисел от 1 до n. задача 2. Даны
натуральные числа A , B, где B>A. Напишите программу последовательность натуральных чисел от A до B, включающая A и B.
Пожалуйста помогите !!!!!!!!
Вы находитесь на странице вопроса "Найти количество чётных чисел от 1 до 100,программа Pascal abc", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.