Question

Corrija o código abaixo:

a) Program meu_programa
b) Uses crt;
c) Var numero, 2numero:real;
d) Begin
e) Writeln ('Me informe um número:');
f) Readln(numero);
g) Writeln ('Me informe o outro número');
h) Readln(2numero);
i) Soma:=numero+numero2;
j) Readln ('O número informado é soma');

Answer 1

program meu_programa;
Uses crt;
Var numero, numero2, soma : real;
Begin
Writeln ('Me informe um número: ');
Readln(numero);
Writeln ('Me informe o outro número');
Readln(numero2);
soma:=numero+numero2;
Writeln ('O número informado é soma ', soma);
readln();
end.