Viết chương trình tính tìm 2 số a và b khi biết tổng và hiệu của chúng viết bằng ngôn ngữ lập trình pascal Lm đúng nhất vote 5 sao nhaaaa

2 câu trả lời

uses crt;

var a,b,S,C:integer;

begin

write('nhap a:');readln(a);

write('nhap b:');readln(b);

S:=a+b;

C:=a-b;

writeln('Tong:',S);

writeln('Hieu:',C);

readln;

end.

uses crt;
var t,h:longint;
begin 
clrscr;
   write('Nhap tong: ');readln(t);
   write('Nhap hieu: ');readln(h);
   writeln('a= ',(t-h) / 2:0:2);
   writeln('b= ',(t+h) / 2:0:2);
readln
end.