atividade 2
2) Qual será o valor exibido na tela pelo algoritmo a seguir?
program exemplo;
var val, num: integer;
begin
___ val:=5;
___ num:=8;
____if (val MOD 2= 0) then
_____begin_
______write (val);
_____end;_
___else
_____begin
_______write (num);
_____end;
end.
R:8
quarta-feira, 16 de setembro de 2009
atividades
1) Faça um algoritmo que leia 2 valores inteiros, calcule e escreva qual deles é maior, bem como escrevendo se estes valores são pares ou ímpares.
R:program nay;
var v1 v2,num integer;
begin
readln (v1);
readln (v2);
If(v1>v2)then;
write(v1);
Else;
If(v2>v1)then;
write(v2);
If(v1MOD2=0)then;
write("o v1 e um numero par");
If(v1MOD2=1)then:
write("o v1 e um numero impar");
Else;
If(v2MOD2=0)then;
write("o v2 e um numero par");
If(v2MOD2=1)then;
write("o v2 e um numero impar");
End.
segunda-feira, 14 de setembro de 2009

Assinar:
Postagens (Atom)