сервис вопросов и ответовПАСКАЛЬ подсчитать количество трёхзначных чисел кратных 50
5-9 класс|
|
Pivtorak2000
04 июня 2013 г., 4:11:51 (10 лет назад)
NastyaThunder
04 июня 2013 г., 7:02:42 (10 лет назад)
program zd;
var
i,n:100..999;
k:integer;
begin
k:=0;
for i:=100 to 999 do
if i mod 50=0 then
k:=k+1;
writeln('Количество= ',k);
end.
вроде бы так
Ответить
Другие вопросы из категории
Программист Вася создал текст, состоящий из 1000 символов. Нам известно, что символы он брал из некоторой таблицы 16 *8, причем все символы этой таблицы ра
зличны. определите информационный объем текста в битах. объясните свой ответ.
Напишите программу, вычисляющую какую сумму денег нужно платить за электроэнергию, если у пользователя программы запрашивается количество КВт
электроэнергии, которое было израсходовано за расчѐтный месяц, и какова плата за 1 КВт электроэнергии.
Помогите пожалуйста с Паскалем!
Составьте программу, которая выводит на экран сумму четных чисел от 30 до 60
Читайте также
Напишите программу, которая в последовательности целых чисел определяет количество трехзначных чисел, кратных 7. Программа получает на вход целые
числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность). Количество чисел не превышает 1000. Введенные числа по модулю не превышают 30000. Про-грамма должна вывести одно число: количество трехзначных чисел, кратных 7
1)Напишите программу, которая в последовательности натуральных чисел определяет количество всех чисел, кратных 3 и оканчивающихся на 4. Программа получает
на вход натуральные числа, количество введённых чисел неизвестно, последовательность чисел заканчивается числом 0 (0 – признак окончания ввода, не входит в последовательность).
2)Найти среднее арифметическое всех целых чисел от a до 200 (значения a и b вводятся с клавиатуры; a>=200);
1)В диапазоне от 0 до 100 подсчитать количество чисел оканчивающихся на 3.
2)В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
Напишите программу, которая в последовательности натуральных чисел определяет сумму чисел, кратных 5. Программа получает на вход количество чисел в
последовательности, а затем сами числа. В последовательности всегда имеется число, кратное 5. Количество чисел не превышает 100. Введённые числа не превышают 300. Программа должна вывести одно число – сумму чисел, кратных 5.
Вы находитесь на странице вопроса "ПАСКАЛЬ подсчитать количество трёхзначных чисел кратных 50", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.