Khi oxi hóa hỗn hợp thức ăn, cơ thể sử dụng hết 595,2l khí O2. Biết loại thức ăn theo thứ tự lipit, protein, gluxit là 1:3:6. a, Tính khối lượng từng loại thức ăn trong hỗn hợp trên. b, Tính năng lượng sản sinh ra khi oxi hóa hoàn toàn hỗn hợp thức ăn trên. Biết 1g gluxit cần 0,83l O2 và giải phóng 4,3 kcal 1g protein cần 0,97l O2 và giải phóng 4,1 kcal 1g lipit cần 2,03l O2 và giải phóng 9,3 kcal CHUYÊN GIA CỨU VỚI!

Cho mình hỏi là trong hai cách viết chương trình này thì cách nào đúng nhất và có thể chạy chương trình trên pascal ạ?

Viết chương trình nhập vào một số có ba chữ số và cho biết số hàng đơn vị, hàng chục và hàng trăm?

Ví dụ: Hay nhap vao mot so co ba chu so: 357

Chu so hang don vi la: 7

Chu so hang chuc la: 5

Chu so hang tram la: 3

C1

Program Nguyen_Van_Thanh;

Uses crt;

Var so, dv, chuc, tram: Integer;

BEGIN

Write(‘Hay nhap vao mot so co ba chu so: 357‘);

Readln(so);

dv:= so mod 10;

so:= so div 10;

chuc:= so mod 10;

tram:= so div 10;

Writeln(‘Chu so hang don vi la: ‘7,dv);

Writeln(*Chu so hang chuc la: ‘5,chuc);

Writeln(‘Chu so hang tram la: ‘3,tram);

Readln;

END

C2

Program Nguyen_Van_Thanh;

Uses crt;

Var so, dv, chuc, tram: Integer;

BEGIN

Write('Hay nhap vao so co ba chu so: ');

Readln(so);

dv:= so mod 10;

so:= so div 10;

chuc:= so mod 10;

tram:= so div 10;

Writeln('Chu so hang don vi la: ',dv);

Writeln('Chu so hang chuc la: ',chuc);

Writeln('Chu so hang tram la: ',tram);

Readln;

END.

Choose the best answer.

We are looking for ____ place to spend ____ night.

Choose the best answer.

Please turn off ___ lights when you leave ___ room.

Choose the best answer.

I like _____ colorful costumes of ____ ethnic minority people in Vietnam.