Buscar

04 - LiguagemDeProgramacao

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você viu 3, do total de 11 páginas

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você viu 6, do total de 11 páginas

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Você viu 9, do total de 11 páginas

Faça como milhares de estudantes: teste grátis o Passei Direto

Esse e outros conteúdos desbloqueados

16 milhões de materiais de várias disciplinas

Impressão de materiais

Agora você pode testar o

Passei Direto grátis

Prévia do material em texto

1COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
% - Variável inteira (2 bytes) (Valor Máximo 32.768)
! – Variável ponto flutuante precisão simples (4 bytes) (1,401298.10-45 a 3,402823.1038 )
# - Variável ponto flutuante precisão dupla (8 bytes) (4,94065645841247.10-324 a 1,79769313486232.10308)
$ - Variável literal
Ex.: aa%, die!, rt# e wr$
O tipo da variável é definida pelo último caractere, se nada for especificado, ela é “variant” e 
real de precisão simples:
LIGUAGEM DE PROGRAMAÇÃO
BASIC
& - Variável inteira (4 bytes) (Valor Máximo 2.147.483.648)
@ - Variável ponto fixo (4 bytes) (Trabalhar com moeda, Valor Máximo 922.337.203.685.477,5807)
2COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
Ex.: DEFDBL A-F, Z (define um intervalo e a letra Z)
Ex.: FUCTION some (aa,bb,...) AS INTEGER
Alguns sistemas aceitam definir o tipo da variável pela letra inicial
As funções retornam um único valor. Podem ser BOLEAN (lógica), BYTE, CURRENCY, 
DATE, DOUBLE, INTEGER, LONG, OBJECT, SINGLE, STRING, VARIANT.
LIGUAGEM DE PROGRAMAÇÃO
BASIC
DEFBOOL
DEFBYTE
DEFINT
DEFLNG
DEFCUR
DEFSGL
DEFDBL
DEFDATE
DEFOBJ
DEFSTR
DEFVAR
Variável lógica (“Boolean”, 2 bytes)
Variável inteira positiva (1 byte)
Variável inteira (2 bytes)
Variável inteira (4 bytes)
Variável ponto fixo (4 bytes)
Variável real de precisão simples (4 bytes)
Variável real de precisão dupla (8 bytes)
Variável data e hora (8 bytes)
Variável endereço (4 bytes)
Variável literal
Variável geral (16 bytes)
-
-
-
-
-
-
-
-
-
-
-
3COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
A B C D E F
Resultado
3
4 1 1 100 =some(C4;D4)*B4 5050
5 10 0,1 10 =some(C5;D5)*B5 5151
6 100 0,01 1 =some(C6;D6)*B6 5050
7 1000 0,001 0,1 =some(C7;D7)*B7 5050
8 10000 0,0001 0,01 =some(C8;D8)*B8 5151
9 100000 0,00001 0,001 =some(C9;D9)*B9 5050,00000000001
10 1000000 0,000001 0,0001 =some(C10;D10)*B10 5150,99999999999
11 10000000 0,0000001 0,00001 =some(C11;D11)*B11 5050
12 100000000 0,00000001 0,000001 =some(C12;D12)*B12 5050
( )
jj
jj
j
jj
jjjjj
D
Cp
j
BB
CD
B
CBj
DCCCCppBSome
j
j
.10
.100;1;1;4
5050,,.3,.2,.1,.0,.
1
.0
=
====
===
+
≤
=
∑ L
Function Some(CJ, DJ)
prog = 0
Some = 0
While prog < DJ
prog = prog + CJ
Some = Some + prog
Wend
End Function
LIGUAGEM DE PROGRAMAÇÃO
BASIC – Propagação de erro
4COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
LIGUAGEM DE PROGRAMAÇÃO
BASIC – Propagação de erro
Function fat(n) As Byte
'Function fat(n) As Integer '(inteira 2 bytes)
'Function fat(n) As Long '(inteira 4 bytes)
'Function fat(n) As CURRENCY '(real 8 bytes)
'Function fat(n) As SINGLE '(real 4 bytes)
'Function fat(n) As DOUBLE '(real 8 bytes)
fat = 1
i = 1
While i < n
i = i + 1
fat = fat * i
Wend
End Function
fat = i!
5COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
LIGUAGEM DE PROGRAMAÇÃO
PLANILHA ELETRÔNICA
B = ActiveCell.Value
c = ActiveCell.Offset(3, 4).Value
ActiveCell.Offset(5, 8).Value = A
ActiveCell.Offset(2, 4).Activate
h = Cells(10, 8).Value ´Atribui a variável h, o conteúdo da célula H10, oitava coluna e décima linha.
´Atribui a variável B, o valor da célula ativa, a 
célula indicada pelo “mouse”.
´Copia o valor da variável A na 
célula localizada cinco linhas e oito 
colunas deslocadas da célula ativa.
´Atribui a variável c, o valor da 
célula ativa, deslocada por três 
linhas e quatro colunas.
´Ativa a célula localizada duas linhas 
e quatro colunas deslocadas da célula 
ativa.
MsgBox(" a = " & a) Expõe: “ a = ” concatenado ao valor da variável a.
6COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
O tipo da variável é definida pelo caracter inicial. As variáveis iniciadas com as letras dentro do 
intervalo I-N (INteira) são consideradas inteiras de 4 bytes, todas as outras são reais de precisão 
simples (4 bytes).
As variáveis podem ser definidas como:
CHARACTER*n - Literal de (n bytes ), CHARACTER ([KIND=]n);
COMPLEX*8 - Complexa de (8 bytes ), COMPLEX([KIND=]8);
COMPLEX*16 - Complexa de (16 bytes ), COMPLEX([KIND=]16), 
(DOUBLE COMPLEX);
INTEGER*1 - Inteira de (1 byte), INTEGER([KIND=]1), -128 a 127; 
INTEGER*2 - Inteira de (2 bytes ), INTEGER([KIND=]2), -32.768 a 
32.767; 
INTEGER*4 - Inteira de ( 4 bytes ), INTEGER ( [ KIND = ] 4 ),
-2.147.483.648 a 2.147.483.647;
INTEGER*8 - Inteira de (8 bytes ), INTEGER([KIND=]8), somente para 
processadores ALPHA, -9.223.372.036.854.775.808 a 
9.223.372.036.854.775.807; 
LOGICAL*1 - Lógica de (1 byte), LOGICAL([KIND=]1), .TRUE. ou 
.FALSE.; 
LOGICAL*2 - Lógica de (2 bytes ), LOGICAL([KIND=]2), .TRUE. ou 
.FALSE.; 
LOGICAL*4 - Lógica de (4 bytes ), LOGICAL([KIND=]4), .TRUE. ou 
.FALSE.;
LOGICAL*8 - Lógica de (8 bytes ), LOGICAL([KIND=]8), somente para 
processadores ALPHA, .TRUE. ou .FALSE.; 
REAL*4 - Real de (4 bytes ), REAL([KIND=]4), 1,17549435.10-38 a 
3,40282347.1038; 
REAL*8 - Real de (8 bytes ), REAL([KIND=]8) (DOUBLE PRECISION) 
2.2250738585072013.10-308 a 1.7976931348623158.10308. e 
2.2250738585072008.10-308 a 4.94065645841246544.10-324 ;
REAL*16 - Real de (16 bytes ), REAL([KIND=]16), somente para sistemas 
OpenVMS and DIGITAL UNIX.
As constates podem ser:
HOLLERITH - nH.........., n caracteres (1 - 2000);
BINÁRIO - B’01...’, B”01...”, 128 dígitos binários (0, 1) é o máximo, os 
zeros à esquerda são ignorados;
OCTAL - O’75...’, O”75...”, 43 dígitos octais (0, 1, 2, 3, 4, 5, 6, 7) é o 
máximo, os zeros à esquerda são ignorados;
HEXADECIMAL - Z’A8...’, Z”A8...”, 32 dígitos hexadecimais (0, 1, 
2, 3, 4, 5, 6, 7, 8, 9, A, B, C, D, E, F) é o máximo, os zeros à esquerda são 
ignorados).
As constantes decimais podem ser:
INTEGER - Inteira de (4 bytes ), se não for especificado o espaço 
ocupado; 
COMPLEXA precisão simples - (Real*4, Real*4), conjunto com 
duas constantes reais de 4 bytes;
COMPLEXA precisão dupla - (Real*8, Real*8), conjunto com duas 
constantes reais de 8 bytes;
LOGICA - Lógica de (4 bytes );
REAL*4 - Real de (4 bytes ), REAL([KIND=]4). 1.235E-8; 
REAL*8 - Real de (8 bytes ), REAL([KIND=]8) (DOUBLE 
PRECISION), 1.235D-8;
REAL*16 - Real de (16 bytes ), REAL([KIND=]16), somente para 
sistemas OpenVMS and DIGITAL UNIX, 1.235Q-8.
LIGUAGEM DE PROGRAMAÇÃO
FORTRAN
7COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
Valor lógico
Valor inteiro
Valor real
Valor complexo
Valor hollerith
Valor literal
LIGUAGEM DE PROGRAMAÇÃO
Representação de dados
8COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
C Win32 Console Application
C Implicit integer*1(a-h,o-z)
C Implicit integer*2(a-h,o-z)
C Implicit integer*4(a-h,o-z)
C Implicit real*4(a-h,o-z)
C Implicit real*8(a-h,o-z)
k = 1
select case(k)
case (1)
Bj = 1.
do i = 1, 10
Cj = 1./Bj
Dj = 100.*Cj
p = 0.
soma = 0.
n = 1
do while(p <= Dj)
p = p + Cj
n = n + 1
soma = soma + p
end do
soma = soma*Bj
Print *, n, p, soma
Bj = Bj*10
end do
case (2)
i = 0.
fat = 1.
do j = 1, 10
i = i + 1
fat = fat * i
print *, j, fat
end do
end select
end
( )
jj
jj
j
jj
jjjjj
D
p
j
BB
CD
B
CBj
DCCCCppBSoma
j
.10
.100;1;1;0
5050,,.3,.2,.1,.0,.
1
0
=
====
===
+
≤
=
∑ L
fat = i!
LIGUAGEM DE PROGRAMAÇÃO
FORTRAN – Propagação de erro
9COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
LIGUAGEM DE PROGRAMAÇÃO
Comandos
Basic Fortran
Definição padrão da variável pelo seu caractere inicial
DefTipo intervalo de letras[, intervalo de letras] . . . Implicit Tipo (intervalo de letras[, intervalo de letras] . . .)
Tipo
Bool
Byte
Int
Long
Cur
Sng
Dbl
Date
Str
Obj
Var
Boolean
Byte
Integer
Long
CurrencySingle
Double
Date
String
Object
Variant
Logical*1 Lógica (1 byte)
Inteira (2 bytes)
Inteira (1 byte)
Inteira (4 bytes)
Real (4 byts)
Real (8 bytes)
Logical*2
Logical*4
integer*1
integer*2
integer*4
real*4
real*8
Character*n
Complex*8
Complex*16
Lógica (2 byte)
Lógica (4 byte)
Literal (n bytes)
Complexa (8 bytes)
Complexa (16 byte)
10COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
LIGUAGEM DE PROGRAMAÇÃO
Comandos
Basic Fortran
Definição padrão da variável pelo seu caractere inicial
11COMPUTAÇÃO NA ENGENHARIA QUÍMICA - EQ 246PhDs
[Call] name [argumentlist]
Conclui a entrada/saída (E/S) para um arquivo aberto usando a instrução Open.
Sintaxe
Close [filenumberlist]
Dim
Repete um bloco de instruções enquanto uma condição é True ou até que ela se torne True.
Sintaxe
Do [{While | Until} condition]
[statements]
[Exit Do]
[statements]
Loop
Ou você pode usar a sintaxe a seguir:
Do
[statements]
[Exit Do]
[statements]
Loop [{While | Until} condition]
Encerra um procedimento ou bloco.
Sintaxe
End
End Function
End If
End Property
End Select
End Sub
End Type
End With
Sai de um bloco de código Do…Loop, For...Next, Function, Sub ou Property.
Sintaxe
Basic
LIGUAGEM DE PROGRAMAÇÃO
Comandos
Fortran

Outros materiais