Question

[Vỹ Thiên]

viết chương trình tính tổng x, y với x, y được nhập từ bàn phím.

viết chương trình tính trung bình 3 số x, y, z được nhập từ bàn phím

Answer 1

[Lovers]

Bài 1 :

Uses crt;

Var x,y:integer;

Begin

clrscr;

Readln(x,y);

Write('Tong cua x,y la ',x+y);

Readln

End.

Bài 2 :

Uses CRT;

var x,y,z:integer; tbc:real;

begin

clrscr;

readln(x,y,z);

tbc:=(a+b+c)/3;

Write('Trung binh cong x,y,z la ',tbc:4:2);

Readln

End.

Answer 2

[Vỹ Thiên]

cám ơn =))))