# data[].attributes.headline
Realizati algoritmul de rezolvare pentru urmatoarele probleme:

# data[].attributes.subject
Realizati algoritmul de rezolvare pentru urmatoarele probleme:

# data[].attributes.body
1. Fie un numar format din trei cifre. Sa se afiseze cifrele sale inepand cu cifra unitatilor.

2. Perimetrul unui patrat este egal cu latura altui patrat. Stiind ca suma perimetrelor celor doua patrate este x, sa se calculeze ariile celor doua patrate.
Exemplu: Pentru x=20 se va afisa aria1=1, aria2=16

# data[].attributes.body
1.Intreg x
Inceput
Citeste x;
Scrie x%10,(x/10)%10,(x/100)%10;
Sfarsit.
2.intreg l,L,x,a1,a2 OK!!!!
Inceput
Citeste x;
l <- (x/20);
L<- 4*l;
a1 <- L^2;
a2 <- l^2;
scrie "a1=", "a2=";
Sfarsit.

# data[].attributes.headline
Mihai Bogdan                FOARTE BINE!!!

# data[].attributes.subject
Mihai Bogdan                FOARTE BINE!!!

# data[].attributes.body
1)  întreg n, a, b, c;
început
citeşte n;
a <- n%10;
n <- [n/10];
b <- n%10;
n <- [n/10];
c <- n%10;
scrie a, b, c;
sfârşit
2) Real x,A1,A2;
Inceput
Citeste x;
A1<-(x/20)^2
A2<-(x/5)^2;
Afiseaza A1,A2;
Sfarsit

# data[].attributes.body
1. intreg n;     Algoritmul tau citeste si afiseaza n
inceput ;
citeste n;
n%10 , (n%100) DIV 10 , n DIV 100;
scrie n;
sfarsit ;

2. real p , P , l , x , a , A Identifica corect datele de intrare si datele de iesire!
inceput ;
citeste  l;
p=4l;
P=l;
p+P=x;
5l=x;
a=l^2 ;
A=(l/4)^2
scrie p , P , x , a , A ;
sfarsit

# data[].attributes.headline
Costache Mihnea :)    ALGORITMI IDENTICI CU AI COLEGILOR TAI!!!

# data[].attributes.subject
Costache Mihnea :)    ALGORITMI IDENTICI CU AI COLEGILOR TAI!!!

# data[].attributes.body
1.
intreg a,b,c,aux,n;
inceput
a <- n%10
n<- [n/10]
b<- n%10
n<-[n/10]
c<-n%10
aux<-a
a<-d
d<-aux
n<-100*a+10*b+c
Afiseaza n
Sfarsit

2.
real l,L,P,p,A;
inceput
citeste l,L;
aux<-L1*l
4*l<-L
L<-aux
x<-4*l+4*L

# data[].attributes.body
1. intreg n,z1,z2,z3; APROAPE OK!!!
Inceput
Citeste z
z1<-n%10;
z2<-n%100/10;
z3<-n/10;
Scrie z1,z2,z3;
Sfarsit.

2 Real x,a1,a2; FOARTE BINE!!!
Inceput
Citeste X;
a1<- X^2/20^2;
a2,-x^2/25;
Scrie a1,a2;
Sfarsit.

# data[].attributes.body
intreg a, b, c, aux, n; Ce rol are aux in algoritmul tau?
inceput
n<-n%10;
n<-n/10;
b<-n%10;
n<-n/10;
c<-n%10;
aux<-a;
a<-d;
d<-aux;
n<-100*d +10*b+c;
afiseaza n;
sfarsit.

real x,a1,a2; CORECT!!!
inceput
citeste x;
a1<-(x/20)^2;
a2<-(x/20*4)^2;
scrie a1,a2;
sfarsit.

# data[].attributes.body
1.intreg d;
Inceput
citeste d;
Scrie d%, (d%100) DIV 10,d DIV 100; O MICA GRESEALA!!!
Sfarsit.

2.real x,a1,a2; FOARTE BINE!!!
Inceput
Citeste X;
a1 <- X^2/20^2;
a2<-X^2/25;
Scrie a1,a2;
Sfarsit.

# data[].attributes.headline
Lazăr Antonio           UN ALGORITM IDENTIC CU AL COLEGELOR TALE!!!

# data[].attributes.subject
Lazăr Antonio           UN ALGORITM IDENTIC CU AL COLEGELOR TALE!!!

# data[].attributes.body
1.Intreg a,b,c,aux, n
Inceput
a<-n%10
n <-[n/10]
b <-n%10
n <-[n/10]
c <-n%10
aux <-a
a <-d
d <-aux
n <-100*a+10*b+c
Afiseaza n
Sfarsit.
2. Real L,l,P,p,A
Inceput
Citeste l,L
p <-aux L*l
4*l<-L
L <-aux
x <-4*l+4*L
Sfarsit.

# data[].attributes.headline
Titlu                 ESTE FOARTE AMBIGUU !!!

# data[].attributes.subject
Titlu                 ESTE FOARTE AMBIGUU !!!

# data[].attributes.body
1. intreg a,b,c,aux,n;
inceputa
a <- n%10n
<- [n/10]b<- n%10n<-[n/10]c<-n%10aux<-aa<-dd<-auxn<-100*a+10*b+cAfiseaza nSfarsit

# data[].attributes.body
Real a,b,c,n
Început
Citește n;
a<-n%10;
n<-[n/10];
b<-n%10;
n<-[n/10];
c<-n%10;

scrie a,b,c;
Sfârșit

# data[].attributes.headline
Mihalcea Mathias              MAI INCEARCA!

# data[].attributes.subject
Mihalcea Mathias              MAI INCEARCA!

# data[].attributes.body
Real c1,c3,c2,n
Început
Citește n;
c1= n MOD 10;
c2=n MOD 100;     Aici calculeaza ultimele 2 cifre!
c3=n MOD 1000; c3=n
Scrie c1,c2,c3;
Sfârșit

# data[].attributes.body
intreg x;
inceput
citeste d;
scrie d%10, (d/10)%10, (d/100)%10;
sfarsit
2. FOARTE BINE

real x ,l, L ,a1 ,a2;
inceput
citeste x;
l=x/20
L=4*l;
a1=l^2;
a2=L^2;
scrie "aria1="a1, "aria2="a2;
sfarsit

# data[].attributes.body
Intreg C1, C2, C3, n;                       OK!!!!
inceput;
citeste n;
C1 <- n%10;
n <- [n/10];
C2 <- n%10;
n <- [n/10];
C3 <- n%10;    SAU    c3<-n;
scrie C1, C2, C3;
sfarsit

Real p, l, L,  x, A1, A2; Identifica corect datele de intrare si datele de iesire!!!
inceput;
citeste p, l, L, x;
L<- 4*l;
A1<-L^2;
A2<-l^2;
Afiseaza A1, A2;
sfarsit

# data[].attributes.body
1. Scrie n, c1, c2 , c3         OK!!!
Inceput
c1 <- n%10                      ;
n <- [n/10]                       ;
c2 <- n%10                     ;
n <- [n%10]                     ;
c3 <- n%10      SAU c3<-n;
Scrie c1,c2,c3                 ;
Sfarsit

2. Real l, L, a1, a2; OK!
Inceput
Citeste X;
a1 <- X^2/20^2 Lipsesc semnele de punctuatie!
a2 <- X^2/25
Scrie a1,a2
Sfarsit

# data[].attributes.body
1. intreg a,b,c,aux,n;
inceput
a <- n%10;
n <- [n/10];
b <- n%10;
n <- [n/10];
c <- n%10;       SAU   c<-n;
n <- 100*a+10*b+c        Trebuie afisate cifrele numarului!!!
afiseaza n;
sfarsit.
2. real l,L,P,p,a,x; Identifica corect datele de intrare si datele de iesire!!!
inceput
citeste l,L;
aux <- 4*l;
4*l <- L;
L <- aux;
x <- 4*l+4*L;
a <- l^2;
A <- L^2;
afiseaza a,A;
sfarsit

# data[].attributes.body
Intreg n; Algoritmul calculeaza alt rezultat decat cel cerut!
Inceput
citeste n;
n<--1000*n+100*n+10*n+n;
Scrie n;
Sfarsit

SUBIECTUL 2 Identifica corect datele de intrare si datele de iesire!!!
Intreg P1,L1,P2,L2;
Inceput
citeste P1,L1,P2,L2;
P1<--L2;
P1<--L1*4;
P2<--L2*4;
x<--P1+P2;
Scrie x;
Sfarsit

Sandu Stefan :)

# data[].attributes.body
SUBIECTUL 1 OK!!!
întreg n, c1, c2, c3;
început
citește n;
c1←n%10;
n←[n/10];
c2←n%10;
n←[n/10];
c3←n%10; SAU c3<-n;
scrie c1, c2, c3;
sfârșit

SUBIECTUL 2 Algoritmul tau nu respecta proprietarea de claritate si eficienta si este incorect!!!

real l1, l2, P1, P2, 1, Ap2;

început
citește P1←l2
P1←4l1
P2←4l2
x←P1+P2
A1←l1^2
A2←l2^2
l2←4*l1;
P2←4*P1;
x←P1+4*P1;
x←5*P1;
P1←x/5;
P2←4x/5;
x/5←4l1;
l1←4x/5;
4*l2←4x/5;
l2=16*x/5;
A1←(4x/5)^2;
A2←(16x/5)^2;
scrie A1, A2;
sfârșit

# data[].attributes.headline
Boiangiu Miron              FOARTE BINE!!!

# data[].attributes.subject
Boiangiu Miron              FOARTE BINE!!!

# data[].attributes.body
1. intreg d;
Inceput
citeste d;
Scrie d % 10, " ", (d % 100) DIV 10, " ", d DIV 100;
sfarsit.
2. real x, a1, a2;
Inceput
Citeste X;
a1 <- X^2/20^2;
a2 <- x^2/25;
Scrie a1, " ", a2;
Sfarsit.

# data[].attributes.body
real p1, p2, l1, l2, a1, a2, x; MAI MULTA ATENTIE!!!
început
citeşte l1, l2;
p1 <- l1;
p2 <- 4*l2;
x <- p1 + p2;
a1 <- l1^2;
a2 <- l2^2;
scrie a1, a2;
sfârşit.

# data[].attributes.body
2. Real l,L,x,a1,a2,p1,p2;        MULTE GRESELI!!!
Inceput
Citeste l;
x<-p1+p2;
p1<- l;
p2<-L*4;
a1<-l^2;
a2<-((x-p1)/4)^2;
Scrie a1,a2;
Sfarsit.

# data[].attributes.body
întreg n, a, b, c; OK!!!
început
citeşte n;
a <- n%10;
n <- [n/10];
b <- n%10;
n <- [n/10];
c <- n%10; sau c<-n;
scrie a, b, c;
sfârşit.

# data[].attributes.body
1. intreg n,c1,c2,c3;         c1,c2,c3 contin ultima cifra a lui n
inceput
c1<-n%10;
n<-(n%109);
c2<-n%10;
n<-(n%10);
c3<-n%10;
scrie c1,c2 ,c3;
sfarsit.

2.real x,a1 ,a2; a2 este incorect!!!
inceput
citeste x;
a1<-(x/5)^2;
a2<-(x/5^4)^2;
scrie a1, a2;
sfarsit.

# data[].attributes.body
1. intreg a,b,c,n;
inceput
a<--n%10;
n<--[n/10];
b<--n%10;
n<--[n/10];
c<--n%10;
n<--100*a+10*b+c;
Afiseaza n;            Trebuie afisate cifrele numarului!
sfarsit;

2. real l,L,x,a,A;
inceput Identifica corect datele de intrare si datele de iesire!
citeste l,L;
aux<--4*l;
4*l<--L;
L<--aux;
x<--4*l+4*L;
a<--l^2;
A<--L^2;
Afiseaza a, A;
Sfarsit

# data[].attributes.body
1.Întreg n,a,b,c; NU MAI NUMEROTA PASII ALGORITMULUI!
2 Inceput;
3 Citeste n;
4 a <--n%10;
5 N <--n/10;
6 b <--n%10;
7 n<--n/10;
8 c <--n;
9 n <--100*a+10*b+c; ALGORITMUL NU AFISEAZA NIMIC!!!
10 Sfarsit;

2. La A2= (x/80)^2...este A2=(x/5)^2 ALGORITMUL ARE PREA MULTI PASI... INUTIL!!!

# data[].attributes.body
1. Intreg n1,n2,n3,n; FOARTE BINE!!!
Inceput
Citeste n;
n1<-- n%10;
n<-- [n/10];
n2<-- n%10;
n<--[n/10];
n3<--- n%10;
Scrie n1,n2,n3;
Sfarsit.

# data[].attributes.body
1)
Real x,c1,c2,c3;
Inceput
Citeste x;
c1<- x DIV 100;
c2<-x MOD 100 DIV 10;
c3<-x MOD 10;
Afiseaza c1,c2,c3;
Sfarsit.

2) FOARTE BINE!!!
Real x,A1,A2;
Inceput
Citeste x;
A1<-(x/20)^2
A2<-(x/5)^2;
Afiseaza A1,A2;
Sfarsit.

# data[].attributes.body
1. FOARTE BINE!!!
intreg c1, c2, c3, n;
real n;
citeste n;
c1<-n%10;
n<-[n/10];
c2<-n%10
n<-[n/10];
c3<-n%10;
scrie c1, c2, c3;
sfarsit.
2. FOARTE BINE!!!
real x, a1, a2;
inceput
citeste x;
a1<-(x/20)^2;
a2<-(x/20*4)^2;
scrie a1, a2;
sfarsit.

# data[].attributes.body
1) intreg n, c1, c2, c3;
Inceput
Citeste n;
C1<- n%10;
C2<- n%100/10;       PARTE INTREAGA!!!
C3<- n%10;             C1 si C3 SUNT IDENTICE!!!
Afiseaza c1, c2, c3;
Sfarsit.
2) real l, A1, A2;
Inceput
Citeste l;
A1<- (x/5)^2            ACEASTA ESTE A2
A2<- (x/5*4)^2
Scrie A1, A2;
Sfarsit.

# data[].attributes.body
1)intreg c1.c2,c3,n
Incpeut
citeste n,c1,c2,c3;
c1-n mod 10          Cui se atribuie aceste diferente?
n-n div 10
c2-n mod 10
n-n div 10
c3-n mod 10
Scrie c1,c2,c3
Sfarsit
2)intreg p1,p2
real a1,a2,x
citeste p1,p2,x
x-p1+p2
a1-(p1/4)*(p1/4)
a2-(p2/4)*(p2/4)
scrie a1,a2
Sfarsit

# data[].attributes.body
1)  FOARTE BINE!
întreg n, c1, c2, c3;început
citește n;
c1<-n%10;
c2<-n%100/10;
c3<-n/10;
scrie c1, c2, c3;
sfârșit.

2)  FOARTE BINE!
real x, a1, a2;
început
citește x;
a1<-(x/20)^2;
a2<-(x/20*4)^2;
scrie a1, a2;
sfarșit.

# data[].attributes.body
1.intreg n;
inceput
citeste n;
n<- n%10*100+[n%100/10]+[n/100];    TREBUIE AFISATE CIFRELE, NU NUMARUL!!!
scrie n;
sfarsit.
2.intreg l1,l2,x,a1,a2; OK!
inceput
citeste x;
x<-5*l2;
l2<-x/5;
l1<-l2/4;
a1<-l1*l1;
a2<-l2*l2;
scrie a1,a2;
sfarsit.