👤

Problemele 5,6,7, va rog, daca puteti

Problemele 567 Va Rog Daca Puteti class=

Răspuns :

Media aritmetică
5)Realizaţi un program care calculează şi afişează media aritmetică a două numere reale x şi y
.Program Media_aritmetica;
Var
media,x,y:Real;
BeginWrite(’Dati numerele:’)
;ReadLn(x,y);
Media:=(x+y)/2;
WriteLn(’Media=’Media:8:2);
ReadLn;
End.  Sper ca te-am ajutat!!!SUCCES Acelea lalte nu leam stiut
7,6,5. Sunt mai multe metode de determinare, daca numarul este palindrom sau nu - eu am folosit metoda reverse string.
Vezi imaginea CRAZZYBEER
Vezi imaginea CRAZZYBEER
Vezi imaginea CRAZZYBEER