Introdução à Programação -1º semestre 2001/2002

Folha prática #9

Visual Basic

1. Um ano é bissexto se é divisível por 4 mas não por 100 ou por 400. Elabore uma função que dado um número inteiro entre 0 e 2500, devolva true se o número corresponde a um ano bissexto;

2. Elabore uma função que dados 3 inteiros correspondentes ao dia mês e ano duma data com o formato dd/mm/aa, devolva o dia seguinte. Por exemplo dia_seg(31,12,2001) 1/1/2002;

3. Um número é perfeito, se é igual à soma dos seus divisores. Por exemplo o número 6 é perfeito pois . Elabore uma função em VB, que dado um número inteiro positivo, devolva true, se o número é perfeito.

4. Elabore uma função em VB, que calcule o factorial de um número inteiro.