tarea de programacion practica

Problema 1
#include
#include
#define p printf
#define s scanf

main ()
{
p("\n\n\n\n\n\n\n\n computacion para ingenieros, miercoles 9 de octubre del 2013\n\n\n\n\n\n\n\n Miguel AngelLopez Montoya\n\n\n\n\n\n\n\n");

system("pause");
}




Programa 2
#include
#include
#define p printf
#define s scanf
float total, c;
main ()
{p("\n\n\n\n\n\n\n\n Programa que convierte grados celsius a Fahrenheit\n\n\n\n\n\n\n\n cuantos grados Celsius deseas convertir??\n\n\n\n ");
s("%f",&c);
total=32+((1.8)*c);
p("los grados fahrenheitson %.2f \n\n\n", total);
system("pause");
}


Programa 3
#include
#include
#define p printf
#define s scanf
float r,a,b,c,d;
main ()
{
p("\n\n\n\n\n\n\n\n Determinacion dela expresion r=(a+b)(c+d)\n\n\n\n\n dame los valores de a, b ,c ,d separados \n\n ");
s("%f %f %f %f",&a,&b,&c,&d);
fflush(stdin);
r=((a+b)*(c+d));
p("r =%.2f \n\n\n", r);system("pause");
}

Programa 4
#include
#include
#define p printf
#define s scanf
float x,y,a,b,c,d,e,f;
main ()
{
p("\n\n\n\n\n\n\n\n calculo de las ecuaciones lineales x,y; dela manera x=((ce-bf)/(ae-bd))\ny=((af-cd)/(ae-bd)) \n dame los a,b,c,d,e,f valores separados ");
s("%f %f %f %f %f %f",&a,&b,&c,&d,&e,&f);
fflush(stdin);x=((c*e)-(b*f))/((a*e)-(b*d));
y=((a*f)-(c*d))/((a*e)-(b*d));
p("x=%.2f \ny=%.2f\n\n", x,y);
system("pause");
}

Programa 5
#include
#include
#define p printf
#define s scanf
float m1,m2,g=6.673e-11,d,f;
main ()
{
p("\n\n\n\n\n\n\n\n fuerza gravitacional \n dame la masa1, masa2 y la distancia separados\n\n\n");
s("%f %f %f",&m1,&m2,&d);
fflush(stdin);f=(g*m1*m2)/(d*d);
p("la fuerza gravitacional es %.2e Nw^2/Kg^2\n\n",f);
system("pause");
}

Programa 6
#include
#include
#define p printf
#define s scanf
float r,a,pi=3.1416;
main ()
{...