Question

Scrieți va rog acest program in Pascal.

#include
using namespace std;
int main()
{
int x;
cin>>x;
if (x==1) cout<<"luni"<<" Zi de scoala";
if (x==2) cout<<"marti"<<" Zi de scoala";
if (x==3) cout<<"miercuri"<<" Zi de scoala";
if (x==4) cout<<"joi"<<" Zi de scoala";
if (x==5) cout<<"vineri"<<" Zi de scoala";
if (x==6) cout<<"sambata"<<" Zi libera";
if (x==7) cout<<"Duminica"<<" Zi libera";
return 0;
}

Answer 1

Răspuns:

program zile;

var x:integer;

begin //pp

writeln('Introduceti x:');

readln(x);

if (x=1) then writeln('luni  Zi de scoala');

if (x=2) then writeln('marti  Zi de scoala');

if (x=3) then writeln('miercuri  Zi de scoala');

if (x=4) then writeln('joi  Zi de scoala');

if (x=5) then writeln('vineri  Zi de scoala');

if (x=6) then writeln('sambata  Zi libera');

if (x=7) then writeln('Duminica Zi libera');

    readln;

    readln;

end