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

// função personalizada que permite verificar se uma
// string contém apenas dígitos de 0 a 9
int is_numeric(const char *str){
  int res = 1; // passou no teste

  // vamos percorrer todos os caracteres da string
  // e testar se cada um é um dígito. Se não
  // for nós marcamos res como 0 e retornamos
  while(*str){
    if(!isdigit(*str)){
      res = 0;
      break;
    }

    // vamos passar para o próximo caractere
    str++;
  }

  return res;
}

int main(int argc, char *argv[]){
  char valor[20]; // vamos guardar o valor digitado aqui

  // vamos ler o valor informado pelo usuário
  printf("Digite qualquer coisa e tecle ENTER: ");
  gets(valor);

  // vamos verificar se o usuário informou uma string
  // que contém apenas dígitos de 0 a 9
  if(is_numeric(valor))
    printf("Voce informou uma string numerica");
  else
    printf("Voce NAO informou uma string numerica");

  puts("\n\n");
  system("PAUSE");
  return 0;
}

int is_numeric(const char *str){
  int res = 1; // passou no teste

  // vamos percorrer todos os caracteres da string
  // e testar se cada um é um dígito ou uma vírgula. Se não
  // for nós marcamos res como 0 e retornamos
  while(*str){
    if((!isdigit(*str)) and (*str != ',')){
      res = 0;
      break;
    }

    // vamos passar para o próximo caractere
    str++;
  }

  return res;
}

# dois vetores de 5 inteiros cada
a = [50, -2, 9, 5, 17]
b = [0 for x in range(5)]

Valores no vetor a: 50   -2   9   5   17   
Valores no vetor b: -20   32   21   25   13

# método principal
def main():
  # dois vetores de 5 inteiros cada
  a = [50, -2, 9, 5, 17]
  b = [0 for x in range(5)]
    
  # vamos preencher o segundo vetor de forma que a soma dos
  # valores de seus elementos seja 30
  for i in range(len(a)):
    b[i] = 30 - a[i]
    
  # vamos mostrar o resultado
  print("Valores no vetor a: ", end="")
  for i in range(len(a)):
    print("{0}  ".format(a[i]), end="") 
    
  print("\nValores no vetor b: ", end="")
  for i in range(len(b)):
    print("{0}  ".format(b[i]), end="") 
  
if __name__== "__main__":
  main()

Imports System

Module Program
  Sub Main(args As String())
    Dim var1 As String ' ainda não foi inicializada...é null
    Dim var2 As String = Nothing ' é null
    Dim var3 As String = "" ' está vazia

    If String.IsNullOrEmpty(var1) Then
      Console.WriteLine("A variável var1 ainda é null ou vazia")
    End If

    If String.IsNullOrEmpty(var2) Then
      Console.WriteLine("A variável var2 ainda é null ou vazia")
    End If

    If String.IsNullOrEmpty(var3) Then
      Console.WriteLine("A variável var3 ainda é null ou vazia")
    End If

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub
End Module

=RADIANOS(A1)