TEXT   7
Código compartilhado do Portugol Webstudio
Guest on 17th March 2023 02:52:30 PM


  1. programa{
  2.   /*   Aula 95: Faça um programa para reservar assentos em uma sala de cinema.
  3.    *    A sala possui 25 filas com 30 assentos cada fila. O programa deve funcionar
  4.    *    enquanto houver assentos vagos ou não for digitadas duas coordenadas negativas.
  5.    *    
  6.    *    Escrito por: Wagner Gaspar
  7.    *    Março de 2021
  8.    */
  9.    
  10.   funcao inicio(){
  11.     inteiro l, c, linha, coluna, reservas = 0, sala[25][30]
  12.  
  13.     para(l = 0; l < 25; l++){
  14.       para(c = 0; c < 30; c++){
  15.         sala[l][c] = 0
  16.       }
  17.     }
  18.  
  19.     faca{
  20.       escreva("0  1  2  3  4  5  6  7  8  9  10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29\n")
  21.       para(l = 0; l < 25; l++){
  22.         para(c = 0; c < 30; c++){
  23.           escreva(sala[l][c], "  ")
  24.         }
  25.         escreva("  ", l, "\n")
  26.       }
  27.  
  28.       escreva("Digie linha e coluna da poltrona desejada: ")
  29.       leia(linha, coluna)
  30.  
  31.       se(linha < 0 ou linha > 24){
  32.         escreva("\nLinha inválida. Digite outra linha válida!\n")
  33.       }
  34.       senao{
  35.         se(coluna < 0 ou coluna > 29){
  36.           escreva("\nColuna inválida. Digite outra coluna válida!\n")
  37.         }
  38.         senao{
  39.           se(sala[linha][coluna] == 1){
  40.             escreva("\nPoltrona já reservada. Escolha outra!\n")
  41.           }
  42.           senao{
  43.             sala[linha][coluna] = 1
  44.             escreva("\nReserva realizada com sucesso!!!\n")
  45.             reservas++
  46.           }
  47.         }
  48.       }
  49.     }enquanto(reservas < 750 e linha >= 0 ou coluna >= 0)
  50.  

Raw Paste

Login or Register to edit or fork this paste. It's free.