Практикум по программированию. Основы. Циклы. Совершенные числа

Циклы

Java

import java.util.Scanner;

public class Task16 {

    public static void main(String[] args) {
        
        Scanner in = new Scanner(System.in);
        
	System.out.println();
        System.out.println(" Поиск совершенных чисел ");
        System.out.println("-------------------------");

        System.out.print(" Введите границу поиска: ");
	long z = in.nextLong();

        System.out.println("-------------------------");

        System.out.print(" Совершенные числа: ");
        
	long i, j, s;

	for (i = 1; i <= z; i++) {
	    s = 0;
	    for (j = 1; j <= i / 2; j++) {
		if (i % j == 0) {
		    s += j;
		}
	    }
	    if (s == i) {
		System.out.print(i + " ");
	    }
	}

	System.out.println();
    }
}

Pascal

---

Циклы