Duvida linguagem C+ [RESOLVIDO]

1. Duvida linguagem C+ [RESOLVIDO]

luccavargas1995
(usa Outra)

Enviado em 04/10/2015 - 02:17h

Galera, ja me ajudaram no topico anterior sobre como fazer a programacao da multiplicacao de dois numeros por soma sucessiva, utilizamdo somente a soma e/ou subtracao, mas de um modo inteligente, exemplo:

2 x 3

2 +2+2 --- forma n inteligente

3 +3 --- forma inteligente

Comseguiram realizar a programacao em linguagem C+, porem necessito em linguagel pascal, se alguem conseguir transformar eu agradeço
Segue o programa na linguagem C+:
Código consertado:

#include <stdio.h>



int main(int argc, char *argv[]){

   int num1, num2, resultado = 0;

   printf("Numero 1: ");

   scanf("%d", &num1);



   printf("Numero 2: ");

   scanf("%d", &num2);



   if(num1 > num2){ // Este if checa se num1 é maior que num2

       for(int i = 1; i < num2; i++){

           resultado += num1;

       }

       printf("%d\n", resultado); // Exibe o resultado do produto

   }



   else{ // Este else é executado quando num2 é maior que num1

       for(int i = 1; i < num1; i++){

           resultado += num2;

       }

       printf("%d\n", resultado); // Exibe o resultado do produto

   }





   return 0;

}

0 0

Quote

2. MELHOR RESPOSTA

removido
(usa Nenhuma)

Enviado em 04/10/2015 - 03:07h

Seu código acima ainda tem erros.

Program XXXXX;



Var 

	num1, num2	:	Integer;

	i, resultado	:	Integer;



Begin



	num1 := 0;

	num2 := 0;

	resultado := 0;



	Write ('Numero 1: ');

	ReadLn (num1);



	Write ('Numero 2: ');

	ReadLn (num2);



	If num1 > num2 Then { Este if checa se num1 é maior que num2 }

	Begin



		For i := 1 To num2 Do

		Begin 

			resultado := resultado + num1;

		End;



		WriteLn (resultado); { Exibe o resultado do produto }



	End

	

	Else { Este else é executado quando num2 é maior que num1 }

	Begin



		For i := 1 To num1 Do 

		Begin

			resultado += num2;

		End;



		WriteLn (resultado); { Exibe o resultado do produto }



	End;



End.

Compilado com FreePascal e testado no Linux.

--
http://s.glbimg.com/po/tt/f/original/2011/10/20/a97264_w8.jpg

Encryption works. Properly implemented strong crypto systems are one of the few things that you can rely on. Unfortunately, endpoint security is so terrifically weak that NSA can frequently find ways around it. — Edward Snowden

1 0

Quote