How may I save the result of the case in a variable to use it later. I tried to save them and I get errors. For example, 270 Ubris/hr.
program Hello;
var
sel:char;
horas: integer;
pagoPorHora: integer;
begin
writeln ('1) Servicios generales');
writeln ('2) Mantenimiento industrial');
writeln ('3) Producción');
writeln ('4) Transporte y almacen');
writeln ('5) Seguridad e hingiene industrial');
writeln ('6) Servicios administrativos');
writeln ('Entrar una selección entre 1-6');
readln(sel);
writeln;
case sel of
'1': writeln('270 Ubis/hr');
'2': writeln('310 Ubis/hr');
//readln(pagoPorHora);
'3': writeln('290 Ubis/hr ');
//readln(pagoPorHora);
'4': writeln('315 Ubis/hr ');
//readln(pagoPorHora);
'5': writeln('285 Ubis/hr');
//readln(pagoPorHora);
'6': writeln('275 Ubis/hr');
//readln(pagoPorHora);
end
writeln("ingrese horas");
//readln(horas);
end.