Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Найти все целые числа из промежутка от 300 до 600, у которых сумма делителей кратна 10 (Netbeans) - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Выполнить сортировку одномерного массива X(100) методом бинарных вставок http://www.cyberforum.ru/cpp-beginners/thread884842.html
Здравствуйте уважаемые пользователи форума, прошу составить программу в с++ просто нужно сдать программу эту через 2 дня
C++ Заполнить массив по следующему правилу Заполнить массив А с 6 строк и 9 столбцов по следующему правилу: http://www.cyberforum.ru/cpp-beginners/thread884839.html
Описать класс Прямоугольник (вывод текущего положения; поворот; перемещение; масштабирование; вывод на экран габаритных размеров) C++
Помогите пожалуйста с задачей в visual c++ Описать класс, реализующий указанные возможности. Класс должен содержать скрытые поля, методы, конструкторы с параметром и по умолчанию. Написать...
Переписать компоненты файла f в файл g C++
Впервые сталкиваюсь с файлами, прошу помочь. Условие задачи: Есть файл f, содержащий числа, делящиеся на 4 (отрицательных столько же сколько и положительных). Переписать числа из файла f в файл g,...
C++ Функция: найти в тексте дату рождения и смерти, вычислить возраст человека http://www.cyberforum.ru/cpp-beginners/thread884808.html
Как в тексте "выловить" дату рождения и смерти, а затем из этих двух дат вычислить возраст человека?
C++ ООП. Полиморфизм Мальчики, учусь на МехМате. Для сдачи зачёта по ООП необходимо написать последнюю программу: Задание: полиморфизм Указание: во всех задачах ввод исходных данных необходимо производить из... подробнее

Показать сообщение отдельно
Nijaz
34 / 34 / 9
Регистрация: 16.12.2010
Сообщений: 100
30.05.2013, 12:58
Pascal
1
2
3
4
5
6
7
8
9
for i:=300 to 600 do
  begin
    s:=0;
    for j:=1 to 300 do
    begin
      if (i mod j)=0 then s:=s+j;
    end;
    if (s mod 10)=0 then writeln(i);
  end;
1
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru