Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
var a,Thunhap_TB:real;i:Integer;
begin
thunhap_tb:=0;
for i:=1 to 50 do
begin
write('thu nhap cua gia dinh thu ',i);
readln(a);
thunhap_tb:= thunhap_tb + a
end;
thunhap_tb:= thunhap_tb/50;
for i := 1 to 50 do begin
write('thu nhap cua gia dinh thu',i) ; readln(a);
write('Do lech o voi thu nhap tb la : ', a - thunhap_tb)
end;
end.
program baitap;
uses crt;
var thanhtien:real;
begin
clrscr;
write (' So tien khach da mua la: '); readln (thanhtien);
if thanhtien>=100000 then thanhtien := (70*thanhtien/100)
else thanh tien := (90*thanhtien/100);
writeln (' So tien khach phai tra la: ',thanhtien:4:2);
readln;
end.
Trả lời:
Câu 2:
Máy tính thực chất chỉ là một thiết bị điện tử vô tri vô giác. Để máy tính có thể thực hiện một công việc theo mong muốn của mình thì con người phải đưa ra những chỉ dẫn thích hợp cho máy. Việc viết nhiều lệnh và tập hợp lại trong một chương trình, giúp con người điều khiển máy tính một cách đơn giản và hiệu quả hơn.
Câu 4:
Trả lời:
Chương trình dịch dùng để dịch cách chương trình được viết bằng ngôn ngữ khác nhằm thực hiện trên máy tính ra ngôn ngữ máy.
Chương trình dịch chuyển đổi các dòng lệnh được soạn thảo thành tệp có thể chạy trên máy tính
Chúc bạn học tốt!!!
Em cần gửi câu hỏi lên đây nhé.
http://d.violet.vn//uploads/resources/present/2/114/529/preview.swf