сервис вопросов и ответовнайдите сумму кратных 7 чисел , меньших 100
5-9 класс|
|
Kmgfys
18 сент. 2013 г., 0:21:53 (10 лет назад)
Ladyanca
18 сент. 2013 г., 3:15:06 (10 лет назад)
var s,i:integer;
begin
for i:=1 to 99 do
if i mod 7=0 then s:=s+i;
writeln(s);
end.
Ответить
Другие вопросы из категории
Помгите!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
Перевести: 192 бит = ? байт 10Кбайт = ? байт 17 байт = ? бит 15360 байт = ? Кбайт 16384 Кбайт = ? Мбайт
помогите пж
из слова информатика надо придумать новое слова на казахском
скажитее, сколько весит текстовый файл до сжатия и после.
тоже самое с графиком.
Читайте также
Составить программу вычисления суммы всех натуральных чисел меньше 100 и кратных b ( от1 до 100).
Нужно составить 1- с циклом с пред условием, 2 - с циклом с пост условием
1)Составить программу нахождения суммы квадратов чисел от 25 до 125.
2) составить программу нахождения чисел от 10 до 99 сумма квадратов которых кратна 13 (mod=0)
3) найти сумму всех целых нечетных чисел меньших 100
4) найти сумму чисел в диапазоне от A до B кратных четырём. Числа А и В вводятся с клавы.
5) Найти все натуральный делители натурального числа n
Напишите программу, которая в последовательности целых чисел находит сумму и количество чисел, кратных 17, или сообщает, что таких чисел нет. На вход
программы подаются целые числа, количество введенных чисел неизвестно, последовательность заканчивается числом 0 (0 - признак окончания ввода, не является членом последовательности). Количество чисел не превышает 100. Введенные числа по модулю не превышают 300. Программа должна вывести сумму и количество чисел, кратных 17, или вывести NO, если таких числе в последовательности нет
Вы находитесь на странице вопроса "найдите сумму кратных 7 чисел , меньших 100", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.