Mascote

O valor de 'C' é propriamente determinado como o valor de 'N'. Essa questão de subtração e soma das entradas,já capitei,e pode avaliar se estar certo da maneira que fiz??

ps: já corregi o 'For' e ainda da erro

Problema já resolvido,foi colocado uma logica,que caso ultrapassasse o valor maximo,ficaria registrado.

Testo aqui e bate certo com os exemplos,mas quando envio para o sistema,diz que está errado..alguem sabe dizer porque??

Já resolvido,realmente o codigo acima foi feita de forma desordenada,fui fazendo passo a passo de acordo com o problema e consegui resolve,valeu

Program Bolo ;


var Soma,A,B,C:integer;



 Begin



 repeat

      readln(A,B,C);

  until (A>=1) and (A<=100) and (B>=1) and (B<=100) and (C>=1) and (C<=100);

     Soma:=A+B+C ;

   if (A mod 2>=0)  or (B mod 3>=0) or (C mod 5>=0) then

           write(Soma div 10);

   else

          write(soma div 10);

 End.