Programação - Ébola 2.2

Programação Ébola 2.2
OBJETIVO
Este programa foi criado com o intuito de ser utilizado por sistemas de saúde, destinando-se a auxiliar na monitorização de doentes infetados com o vírus Ébola.
Ébola 2.2 basicamente pede informações como o nome e o número de utente, e depois calcula o período de tempo caso seja possível em que a infeção atingirá a sua fase crítica baseado no número de dias com sintomas e na existência dos mesmos.
VARIÁVEIS
No correr do programa utilizou-se variáveis como dias_sintomas corresponde ao número de dias que os sintomas ocorrem, e dias_vida, que é o número de dias que demorará a que se atinja o período crítico da doença. O num_utente é o número de utente. A variável num serve para delimitar o número de algarismos do número de utente. Estas variáveis são números inteiros.
A variável nome é texto e corresponde a nome do utente. Ainda existe a variável sintomas que é boolean, serve para verificar a existência de sintomas ou não.
3
PSEUDOCÓDIGO
Programa EBOLA2_2;
Variáveis
dias_sintomas, dias_vida, num: inteiros; num_utente, nome, sintomas: texto; yn: carateres;
Constantes
b=20;
Iniciar
Limpar tela;
Escrever('Se está a ser submetido a este teste é porque lhe foi diagnosticado Ébola');
Escrever('Introduza o seu nome completo:');
Ler(nome);
Enquanto (num 9) do
Iniciar
Escrever('Introduza o seu número de utente:');
Ler(num_utente);
num:=comprimento(num_utente);
Fim;
Escrever('Não estabeleça contato direto ou indireto com outras pessoas. O vírus é extremamente contagioso.');
Escrever('Os sintomas críticos já apareceram (febre muito alta, hemorragias e sangue nas secreções)? Digite "Y" para sim ou "N" para não.');
Ler(sintomas);
Se sintomas='y' então
Iniciar
Escrever('Existem condições para calcular o periodo crítico da doença.');
Escrever('Há quantos dias se iniciaram os sintomas críticos? Responda com um numero inteiro.');
Ler(dias_sintomas);
Se dias_sintomas=20 então
Iniciar
Escrever('O utente ', nome, ', de