Помогите пожалуйста, срочно надо.
5-9 класс
|
Заранее большое спасибо)
1) Определите и выведите на экран количество четырехзначных чисел, которые делятся без остатка одновременно на 5 и 11.
2) Найдите и выведите на экран все двузначные числа, у которых при умножения на 2 сумма цифр увеличивается на 5.
1)var a,b:integer;
begin
b:=0;
for a:=1000 to 9999 do
begin
if (a mod 5=0) and(a mod 11=0)then b:=b+1;
end;
writeln(b);
end.
Комментарий удален
Пожалуйста,я тоже сначала так сделал,только результат проверил и нашёл ошибку)
Комментарий удален
Другие вопросы из категории
напишите слово плиз!!!
Создайте программ в ПАСКАЛЬ который считывает из текстового файла DATE.IN по одному номеру из 4 цыфры из каждой линии, и создает другой текстовый файл DATE.OUT
где записывает только номера "хорошо упорядоченные". На экране должно отображаться количество таких цыфр.
Хорошо упорядочнные - Это те номера у которых цыфр 1 2 3 7 9 12, 16 ... (строго возрастают) или у которых цыфр 17 14 8 5 4 2 1 (строго уменьшаются)
ЗАРАНЕЕ СПАСИБО!!! Только 25 очков!!! Имел бы больше!!! Всех бы поставил!!!
5-й клас допоможіть будь ласка!!!!
Читайте также
Водится возраст человека вывести имеет ли право человека голосовать (<=18) если не имеет то вывести сколько лет ему надо подождать
Водится возраст человека вывести имеет ли право человека голосовать (>=18) если не имеет то вывести сколько лет ему надо подождать
С кондитерской фабрики отгружают конфеты в коробках по 10 кг, 5 кг и 1 кг. Какое наименьшее количество коробок потребуется для перевозки N килограмм конфет?
1-2 обзаца и придумайти к ним подзаголовки.Запишите эти подзаголовки.
электронной таблицы или в среде системы управления базами данных!КАК МНЕ ЭТОГО ВЫПОЛНИТЬ???