Informe o ano: 2024
O ano informado é bissexto.

// Como testar se um ano é bissexto em Portugol
programa {
  funcao inicio() {
    // variáveis usadas na resolução do problema
    inteiro ano

    // vamos solicitar que o usuário informe um ano
    escreva("Informe o ano: ")
    leia(ano)

    // vamos verificar se o ano informado é bissexto
    se (((ano % 4 == 0) e (ano % 100 != 0)) ou (ano % 400 == 0)) {
      escreva("O ano informado é bissexto.")
    }
    senao {
      escreva("O ano informado não é bissexto.")
    }
  }
}

	
int toupper(int c);

#include <stdio.h>
#include <stdlib.h>

void strtoupper(char *string){
  while(*string){
    *string = toupper(*string);
    string++;
  }
}

int main(int argc, char *argv[])
{
  char frase[] = "Programando em C";
  printf("Frase normal: %s\n", frase);
  
  strtoupper(frase);
  
  printf("Em letras maiusculas: %s\n\n", frase);
  
  system("PAUSE");	
  return 0;
}

Informe o primeiro número: 8
Informe o segundo número: 3
A soma dos números é: 11
O produto dos números é: 24
A diferença dos números é: 5
O quociente dos números é: 2.66667

; Este é o programa principal
(defun Exercicio()
  ; Variáveis usadas na resolução do problema
  (let ((n1)(n2)(soma)(produto)
    (diferenca)(quociente))
    ; Vamos ler os dois números
    (princ "Informe o primeiro número: ")
    ; talvez o seu compilador não precise disso
    (force-output)
    ; atribui o valor lido à variável n1
    (setq n1 (read))
    (princ "Informe o segundo número: ")
    ; talvez o seu compilador não precise disso
    (force-output)
    ; atribui o valor lido à variável n2
    (setq n2 (read))
  
    ; vamos somar os dois números
    (setq soma (+ n1 n2))
    ; vamos calcular o produto
    (setq produto (* n1 n2))
    ; vamos calcular a diferença
    (setq diferenca (- n1 n2))
    ; vamos calcular o quociente
    (setq quociente (/ n1 (* n2 1.0)))
  
    ; E mostramos o resultado
    (format t "A soma dos números é ~D" soma)
    (format t "~%O produto dos números é ~D" produto)
    (format t "~%A diferença dos números é ~D" diferenca)
    (format t "~%O quociente dos números é ~F" quociente)	
  )
)

; Auto-executa a função Exercicio()
(Exercicio)

<style type="text/css">
  body, td {font: 70% Verdana}
  .oculta {display: none}
</style>

<div id="div_1">Sou um DIV</div>

<script type="text/javascript">
<!--
  function ocultarExibir(){
    $("#div_1").toggleClass("oculta");
  }
//-->
</script>

# define um array de cidades
cidades = %w(Goiânia Salvador Rio\ de\ Janeiro São\ Paulo)

# exibe os elementos do array
cidades.each do |cidade|
  puts cidade
end

>> 30 * (pi / 180) [Enter]
ans = 0.5236
>>

>> deg2rad(30) [Enter]
ans = 0.5236
>>

graus = input("Informe o ângulo em graus: ");
radianos = deg2rad(graus);
fprintf("O ângulo em radianos é %f\n", radianos);

<?
  $empresas[0] = "Sun";
  $empresas[1] = "Adobe";
  $empresas[2] = "Microsoft";

  $criadores['Java'] = "Sun";
  $criadores['ActionScript'] = "Adobe";
  $criadores['C#'] = "Microsoft";
?>

<?
  $empresas = array('Sun', 'Adobe', 'Microsoft');
  
  $criadores = array('Java' => 'Sun',
    'ActionScript' => 'Adobe', 'C#' => 'Microsoft');
?>

<?
  $empresas = array('Sun', 'Adobe', 'Microsoft');
  
  $criadores = array('Java' => 'Sun',
    'ActionScript' => 'Adobe', 'C#' => 'Microsoft');

  foreach($empresas as $nome){
    echo $nome . "<br>";
  }

  echo "<br>"; 

  foreach($criadores as $linguagem => $criador){
    echo "$criador criou o $linguagem<br>";
  }
?>

<?
  $empresas = array('Sun', 'Adobe', 'Microsoft');
  
  if(is_array($empresas)){
    echo 'A variável $empresas é do tipo array.';
  }
?>

import java.util.Scanner;

public static void main(String[] args){
  // para este exercício você deverá importar a classe
  // Scanner. Ela está no pacote java.util.*;
    
  // vamos construir um objeto da classe Scanner para ler a
  // entrada do usuário
  Scanner entrada = new Scanner(System.in);

  int valor; // guarda o valor lido
  int maior = 0, menor = 0; // variáveis que guardarão o maior e o menor valor lido

  // vamos pedir ao usuário que informe 10 valores inteiros
  for(int i = 0; i < 10; i++){
    System.out.print("Informe o " + (i + 1) + "º valor: ");
    valor = Integer.parseInt(entrada.nextLine());

    // esta é a primeira iteração do laço? se for vamos assumir que o
    // maior e menor valor lido são o primeiro valor informado
    if(i == 0){
      maior = valor;
      menor = valor;
      // poderia ser escrito assim:
      //maior = menor = valor;
    }
    else{ // não é a primeira iteração
      // vamos verificar se é maior que o valor atual da variável maior
      if(valor > maior){
        maior = valor;
      }
      // vamos verificar se é menor que o valor atual da variável menor
      if(valor < menor){
        menor = valor;
      }
    }
  }

  // vamos exibir o maior e o menor valor lido
  System.out.println("\nO maior valor lido foi: " + maior);
  System.out.println("O menor valor lido foi: " + menor);
}

#include <stdio.h>
#include <stdlib.h>
#include <string.h>
 
// função personalizada que permite contar as
// ocorrências de um caractere em uma string
int char_count(const char *str, char caractere){
  int i, quant = 0;
 
  // vamos percorrer todos os caracteres da string
  for(i = 0; str[i]; i++){
    if(str[i] == caractere){ // localizamos
      quant++;
    }
  }
 
  return quant;
}
 
int main(int argc, char *argv[]){
  char frase[] = "Gosto muito de Java, JavaScript e Python";
 
  printf("Ocorrencias encontradas: %d",
    char_count(frase, 'a'));
 
  puts("\n\n");
  system("PAUSE");
  return 0;
}

<html>
<head>
<title>Estudando PHP</title>
</head>
<body>

<?php
  echo "Agora é: " . date("d/m/Y - H:i:s") . "<br>";
  $proxima_data = mktime(date("H") + 15, date("i"), 
    date("s"), date("m"), date("d"), date("Y"));
  echo "Daqui a 15 horas será: " . 
    date("d/m/Y - H:i:s", $proxima_data);
?>
 
</body>
</html>