multiplos pascal

program multiplos;

uses crt;
var i ,num1,num2 : byte;

BEGIN
    writeln('this program list the multiples of a two numbers until 200');
    writeln('programe pour doner les multiples de deux numeros jusqua 200');
    writeln('programa para calcular os multiplos de dois numeros até 200');
    writeln;
    writeln(' first number? premier numero? primeiro numero?');
    readln(num1);
    writeln(' another number? autre numero? outro numero?');
    readln(num2);
    for i:=1 to 200 do
    if (i mod num1=0) and (i mod num2=0) then write(i,' ');
END.

Vamos hoje determinar a equação da reta que passa por dois pontos A e B:
Let us determine the equation of the line passes through two points A and B:
Déterminer l'équation de la ligne passe par deux points A et B:

                            A(-3,-1)
                            B(3,2)


Temos muitas formas de determinar a equação desta reta.
Vamos usar o metodo de sistema de duas equacões.
We have many ways to determine the equation of this line.
Let's use the two equations method.
Nous avons plusieurs façons de déterminer l'équation de cette ligne.
Nous allons utiliser la méthode de deux équations.
 
sabemos que a equação da reta é da forma y=mx+b
we know that the equation of the line is of the form y = mx + b
nous savons que l'équation de la ligne est de la forme y = mx + b

vamos usar o ponto A e substituir e determinamos uma equação
we will use the point A, and replace and determine an equation
nous allons utiliser le point A, et de le remplacer et de déterminer une équation
                 
                             -1 = m*(-3) +b

vamos usar o ponto B e substituir e determinamos outra equação
we will use the point B and replace and determine another equation
on vas utiliser le point B et remplacer et determiner autre  equation

                           

                              2=m*3+b

da resolução deste sistema de equacoes determinamos os valores de m e de b e teremos a nossa equação da reta que passa em A e B
the resolution of this system equations determine the values of m and b and we will have our equation of the line passes at A and B
La résolution de ce système d'équations de déterminer les valeurs de m et b, et nous aurons notre équation de la droite passe en A et B

-1=-3m+b
2=3m+b 
----------------  vamos usar o metodo de adicão já estudado neste blog e youtube associado
1=2b         we use the addition method already studied this blog and youtube associated
                      nous utilisons la méthode d'addition déjà étudié ce blog et YouTube associé

b=1/2 <------ este é o valor de b, substituimos na equacao a seguir e determinamos o m
                         this is the value of b, we substitute the following equation and determine the m
                    ceci est la valeur de b, nous substituons l'équation suivante et de déterminer les m

• 2=3m+b
• 
  
• 2=3m+1/2
• 4=6m+1
•  4-1=6m
• 3=6m
• m=1/2

nossa equação de reta:
our straight equation:
notre équation linéaire:

      y=x/2 +1/2