bài 6:

program bai_giai;

uses crt;

var a,b,c:longint;

begin

clrscr;

write('nhap ba so a,b,c:');readln(a,b,c);

write('tong cua 3 so la:',a+b+c);

readln;

end.

bài 7:

program bai_giai;

uses crt;

var a,b,c,s:longint;

begin

clrscr;

write('nhap ba so a,b,c:');readln(a,b,c);

s:=a+b+c;

write('trung binh cong ba so a,b,c la:',s/3);

readln;

end.

Câu 6:

uses crt;

var a, b, c : integer;

begin

clrscr;

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

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

write('nhap so c :');readln(c);

writeln('tong ba so :', a + b + c);

readln

end.

Câu 7 :

uses crt;

var a,b,c,s:longint;

begin

clrscr;

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

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

write('nhap so c :');readln(c);

writeln('trung binh cong ba so : ', ((a + b + c) / 3):3:2);

readln

end.