Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

FILIPEINFORMATICA10

Como passar esse código do pascal para o PHP

Recommended Posts

uses Crt;
   
   var X, Y : Integer;
   
   begin
     Writeln ('Entre com dois Números:'); { Mostra na tela a mensagem}
     Readln (X, Y); { Lê os dois números }
     If (X = Y) Then {Condição - SE X for igual a Y}
     Begin  {INICIO - Repare abaixo que existe duas instruções, dois comandos Writeln, por isso estão entre BEGIN e END}
       Writeln ('X é igual que Y');
       Writeln ('O Valor de X é =', X);
     End; {FIM}
   end.

Compartilhar este post


Link para o post
Compartilhar em outros sites

FILIPEINFORMATICA10

Para converter a tela PASCAL em código PHP você precisara ter 2 arquivos, 1 para exibir a solicitação dos dados de entrada e 1 para realizar a verificação do que você precisa, no caso saber se X é igual a Y, segue código abaixo:

 

Código convertido abaixo:

Arquivo index.php

Digite os valores: <br>
<form name="formSend" method="post" action="calcular.php" >
<input type="text" name="v1" autofocus required />
<input type="text" name="v2" required />
<input type="image" src="calcular.png" align="center" /></td>
</form>

<?php session_start();
if (!empty($_SESSION['retorno_calculo'])) {
    echo "<font color='#FF3300'>Alerta: </font>".$_SESSION['retorno_calculo'];
    $_SESSION['retorno_calculo'] = "";
} ?>

 

Arquivo calcular.php

<?php
session_start();
if ($_POST['v1'] == $_POST['v2']) {
    $_SESSION['retorno_calculo'] = "X é igual que Y <br> O Valor de X é = ".$_POST['v1'];
} else {
    $_SESSION['retorno_calculo'] = "Os valores são diferentes. <br> X = ".$_POST['v1']."<br> Y = ".$_POST['v2'];
};
header("Location: index.php");
exit();
?>

 

coloque todos os arquivo na mesma pasta e seja feliz.

 

Anexei a imagem que usei para enviar o formulário, apenas para ficar mais bonito.

 

Espero ter ajudado

 

Att.

Felipe Coutinho

 

calcular.png

Compartilhar este post


Link para o post
Compartilhar em outros sites

Muito obrigado vou ver aqui . mais acabei mandando errado queria saber se fosse assim como o código abaixo só me explicar no  caso de passar da 1 condição para ai sim seguir a 2 .  o resto entendi como me passou acima . 

Begin
     Readln (X,Y,A,B);
     If (X > Y) Then { Entrará no Próximo If apenas se a variável X for maior que a variavel Y }
     | If (A > B) 
     | | Then Writeln ('X é maior que Y e A é maior que B') {Sem ";"}
     | Else Writeln ('A não é Maior que B')   {Sem ";"}
     Else Writeln ('X não é maior que Y');
   End.

 

Compartilhar este post


Link para o post
Compartilhar em outros sites

FILIPEINFORMATICA10

Segue o código convertido

 

Arquivo index.php

Digite os valores: <br>
<form name="formSend" method="post" action="calcular.php" >
Digite valor de X <input type="text" name="X" autofocus required /><br />
Digite valor de Y <input type="text" name="Y" required /><br />
Digite valor de A <input type="text" name="A" required /><br />
Digite valor de B <input type="text" name="B" required /><br />
<input type="image" src="calcular.png" align="center" /></td>
</form>

<?php session_start();
if (!empty($_SESSION['retorno_calculo'])) {
    echo "<font color='#FF3300'>Alerta</font> - ".$_SESSION['retorno_calculo'];
    $_SESSION['retorno_calculo'] = "";
} else {
    $_SESSION['retorno_calculo'] = "Area de mensagem de retorno de erro";
    echo "<font color='#FF3300'>Alerta</font> - ".$_SESSION['retorno_calculo'];
    $_SESSION['retorno_calculo'] = "";
};
?>

 

Arquivo calcular.php

<?php
session_start();
ECHO "ENTREI PARA CALCULAR";
if ($_POST['X'] > $_POST['Y']) {
    if ($_POST['A'] > $_POST['B']) {
        $_SESSION['retorno_calculo'] = "X maior que Y e A maior que B";
    } else {
        $_SESSION['retorno_calculo'] = "A menor que B";
    }
} else {
    $_SESSION['retorno_calculo'] = "X menor que Y";
};
header("Location: 2valores.php");
exit();
?>

 

Espero ter ajudado

 

Att.

Felipe Coutinho

Compartilhar este post


Link para o post
Compartilhar em outros sites

  • Conteúdo Similar

    • Por violin101
      Caros amigos, saudações.
       
      Por favor, me permita tirar uma dúvida com os amigos.

      Tenho um Formulário onde o Usuário digita todos os Dados necessários.

      Minha dúvida:
      --> como faço após o usuário digitar os dados e salvar, o Sistema chamar uma Modal ou mensagem perguntando se deseja imprimir agora ?

      Grato,
       
      Cesar
    • Por Carcleo
      Tenho uma abela de usuarios e uma tabela de administradores e clientes.
      Gostaria de uma ajuda para implementar um cadastro
       
      users -> name, login, passord (pronta) admins -> user_id, registratiom, etc.. client -> user_id, registratiom, etc...
      Queria ajuda para extender de user as classes Admin e Client
      Olhem como estáAdmin
      <?php namespace App\Models; use Illuminate\Database\Eloquent\Factories\HasFactory; use Illuminate\Database\Eloquent\Model; class Admin extends User {     use HasFactory;            protected $fillable = [         'name',         'email',         'password',         'registration'     ];      private string $registration;     public function create(         string $name,          string $email,          string $password,         string $registration     )     {         //parent::create(['name'=>$name, 'email'=>$email, 'password'=>$password]);         parent::$name = $name;         parent::$email = $email;         parent::$password = $password;         $this->registration = $registration;     } } User
      <?php namespace App\Models; // use Illuminate\Contracts\Auth\MustVerifyEmail; use Illuminate\Database\Eloquent\Factories\HasFactory; use Illuminate\Foundation\Auth\User as Authenticatable; use Illuminate\Notifications\Notifiable; use Illuminate\Database\Eloquent\Relations\BelongsToMany; class User extends Authenticatable {     /** @use HasFactory<\Database\Factories\UserFactory> */     use HasFactory, Notifiable;     static string $name;     static string $email;     static string $password;     /**      * The attributes that are mass assignable.      *      * @var list<string>      */     protected $fillable = [         'name',         'email',         'password',     ];          /**      * The attributes that should be hidden for serialization.      *      * @var list<string>      */     protected $hidden = [         'remember_token',     ];     /**      * Get the attributes that should be cast.      *      * @return array<string, string>      */     protected function casts(): array     {         return [             'email_verified_at' => 'datetime',             'password' => 'hashed',         ];     }          public function roles() : BelongsToMany {         return $this->belongsToMany(Role::class);     }       public function hasHole(Array $roleName): bool     {                 foreach ($this->roles as $role) {             if ($role->name === $roleName) {                 return true;             }         }         return false;     }         public function hasHoles(Array $rolesName): bool     {                 foreach ($this->roles as $role) {             foreach ($rolesName as $rolee) {             if ($role->name === $rolee) {                 return true;             }          }         }         return false;     }         public function hasAbility(string $ability): bool     {         foreach ($this->roles as $role) {             if ($role->abilities->contains('name', $ability)) {                 return true;             }         }         return false;     }     } Como gravar um Admin na tabela admins sendo que ele é um User por extensão?
      Tentei assim mas é claro que está errado...
      public function store(Request $request, Admin $adminModel) {         $dados = $request->validate([             "name" => "required",             "email" => "required|email",             "password" => "required",             "registration" => "required"         ]);         $dados["password"] =  Hash::make($dados["password"]);                  $admin = Admin::where("registration",  $dados["registration"])->first();                  if ($admin)              return                    redirect()->route("admin.new")                             ->withErrors([                                 'fail' => 'Administrador já cadastrados<br>, favor verificar!'                   ]);                            $newAdmin = $adminModel->create(                                    $dados['name'],                                    $dados['email'],                                    $dados['password'],                                    $dados['registration']                                 );         dd($newAdmin);         $adminModel->save();         //$adminModel::create($admin);                  return redirect()->route("admin.new")->with("success",'Cadastrado com sucesso');     }  
    • Por violin101
      Caros amigos, saudações.
       
      Gostaria de tirar uma dúvida com os amigos, referente a PDV.
       
      Estou escrevendo um Sistema com Ponto de Vendas, a minha dúvida é o seguinte, referente ao procedimento mais correto.

      Conforme o caixa vai efetuando a venda, o Sistema de PDV já realiza:
      a baixa direto dos produtos no estoque
      ou
      somente após concretizar a venda o sistema baixa os produtos do estoque ?
       
      Grato,
       
      Cesar
       
    • Por violin101
      Caros amigos do grupo, saudações e um feliz 2025.
       
      Estou com uma pequena dúvida referente a Teclas de Atalho.

      Quando o Caps Lock está ativado o Comando da Tecla de Atalho não funciona.
      ou seja:
      se estiver para letra minúscula ====> funciona
      se estiver para letra maiúscula ====> não funciona
       
      Como consigo evitar essa falha, tanto para Letra Maiúscula quanto Minúscula ?

      o Código está assim:
      document.addEventListener( 'keydown', evt => { if (!evt.ctrlKey || evt.key !== 'r' ) return;// Não é Ctrl+r, portanto interrompemos o script evt.preventDefault(); });  
      Grato,
       
      Cesar
    • Por violin101
      Caros amigos, saudações.
       
      Por favor, poderiam me ajudar.

      Estou com a seguinte dúvida:
      --> como faço para para implementar o input código do produto, para quando o usuário digitar o ID o sistema espera de 1s a 2s, sem ter que pressionar a tecla ENTER.

      exemplo:
      código   ----   descrição
           1       -----   produto_A
       
      Grato,
       
      Cesar
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.