Question

) Zilele săptămânii luni, marţi, miercuri, ... , duminică sunt notate prin numerele 1, 2, 3, ..., 7. Scrieţi un program care citeşte de la tastatură numărul x şi afişează pe ecran mesajul “Zi de şcoală”, dacă numărului x îi corespunde o zi de şcoală şi mesajul “Zi liberă”, dacă numărului x îi corespunde o zi de odihnă. * (În pascal!!!!!!!!!!)​

Answer 1

program Zile;

var x: integer;

begin

   write('Ziua este (x): '); readln(input, x);

   if((x = 6) or (x = 7)) then

       writeln('Zi libera')

   else

       writeln('Zi de scoala');

end.