Răspuns :
Răspuns:
program interschimbareContinut;
var ceai, cafea, goala:integer;
begin
write('introdu continut pentru cana cu ceai: '); read(ceai);
write('introdu continut pentru cana cu cafea: '); read(cafea);
goala:=ceai; {am turnat ceaiul in cana goala}
ceai:=cafea; {am turnat cafea in cana de ceai}
cafea:=goala; {am turnat ceaiul din cana goala in cana de cafea}
writeln('Rezultatele interschimarii: ');
writeln('continutul din cana de ceai: ',ceai);
writeln('continutul din cana de cafea: ',cafea);
end.
Explicație:
Vă mulțumim pentru vizita pe site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Nu ezitați să ne contactați pentru orice întrebare sau dacă aveți nevoie de asistență suplimentară. Vă așteptăm cu drag data viitoare și nu uitați să ne adăugați la favorite!