Lista 03a - DCC/UFMG

16) Criar um algoritmo em PORTUGOL que imprima todos os números de 1 até 100,inclusive, e a soma de todos eles.algoritmo L3P016;varinteiro: C,SOMA;inícioSOMA ← 0;para C de 1 até 100 façaimprima(C);SOMA ← SOMA + C;fim-paraimprima("O valor da soma é: ",SOMA);fimprogram l3p016;varC,SOMA: integer;beginSOMA := 0;for C := 1 to 100 dobeginwriteLn(C);SOMA := SOMA + C;end;writeLn('O valor da soma eh: ',SOMA);end.SOMA = 0;for C = 1 : 100disp( C );SOMA = SOMA + C;endfprintf(1,'O valor da soma eh: %d\n',SOMA);UFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 16