Hola compañeros del foro tengo un problema con una funcion en pascal como lo die el titulo del tema pues resulta que tengo esta funcion
Program opciones;
Uses Crt;
Var
num,num2,res,sum,mult,divi,:integer;
base,alt:integer;
bas,altu:integer;
nume:integer;
opc:char;
Begin
Repeat
gotoxy(15,6);('[1]suma, resta, multiplicacion y division de 2 numeros');
gotoxy(15,7);('[2]area de un rectangulo');
gotoxy(15,8);('[3]area de un triangula');
gotoxy(15,7);('[4]numero positivo o negativo');
gotoxy(15,8);('[5]multiplo de 5');
gotoxy(15,30);('[s]salir');
gotoxy(20,30);('¿Que opcion quieres?');
Pues ahi esta la funcion trato de correrla pero no sale nada yo se que tengo un error pero no se cual bueno quisiera saber si me podian indicar donde esta el error y tambien si me podian ayudar a terminar la funcion tienen que ser 15 variables pero nose como hacerle y que la funcion haga los siguientes pasos
1.- suma, resta, multiplicacion y division de dos numeros
2.-área de un rectángulo
3.-Área de un triángulo
4.-número positivo o negativo
5.-múltiplo de 5
Ojala me puedan ayudar con este problemota que tengo
de antemano muchas gracias