1 Fa A Um Algoritmo Para Ler Dois N Meros Inteiros A E B E Informar Se A Divis Vel Por B

1ª Faça um algoritmo para ler dois números inteiros A e B e informar se A é divisível por B.

Algorítimo_01 Declare A, B: Inteiro; Escreva(“Digite dois números:”); Leia(A,B); se (AdivB=0) então Escreva(“O primeiro número é divisível por pelo segundo”); senão Escreva("O primeiro número não é divisivel pelo segundo"); fimse fimalgoritimo 2ªFaça um algoritmo para ler dois números inteiros e escrever o maior.
Algoritmo_02
Declare A,B: Inteiro; escreva("Informe dois números:"); Leia(A,B); se(A>B)entao Escreva("O maior número é:",A); senão Escreva("O maior número é:",B); fimse fimalgoritmo 3 Faça um algoritmo para ler duas variáveis inteiras A e B e garantir que A e B fiquem em ordem crescente, ou seja, a variável A deverá armazenar o menor valor fornecido e a variável B o maior.

Algoritmo_03 declare A,B,X: Inteiro; x<-0; escreva("Informe dois números:"); Leia(A,B); se(A>B)entao senão X<-A;A<-B;B<-X; fimse fimalgoritmo 4. Escreva um programa para ler um número inteiro e imprimir se ele é positivo, negativo ou nulo.
Algoritmo_04
declare A:inteiro; escreva("Informe um número:"); leia(A); se(A>0)entao escreva("Este número é positivo"); senão se(A=0)entao escreva("Este número é nulo"); senão escreva("Este número é negativo"); fimse fimse fimalgoritmo 5ªCriar um algoritmo que leia dois números inteiros e imprimir o quadrado do menor número e a raiz quadrada do maior número, e a mensagem "São Iguais" para números iguais.

Algoritmo_05

declare A,B,Q,Q1:Inteiro; declare R,R1:real; R<-0.0;R1<-0.0;Q<-0.0;Q1<-0.0; escreva("Informe dois números:"); Leia(A,B); Q<-A^2;Q1<-B^2;R<-A**(1/2.0);R1<-B**(1/2.0); se(A>B)então escreva("O quadrado do menor número e:",Q1," e a raiz do maior é:",R); senão se(A<B)então