Vì sao trong khẩu phần ăn, chúng ta nên chú trọng đến rau và hoa quả tươi ?

1. Vì những loại thức ăn này chứa nhiều chất xơ, giúp cho hoạt động tiêu hoá và hấp thụ thức ăn được dễ dàng hơn.

2. Vì những loại thực phẩm này cung cấp đầy đủ tất cả các nhu cầu dinh dưỡng cần thiết của con người.

3. Vì những loại thức phẩm này giúp bổ sung vitamin và khoáng chất, tạo điều khiện thuận lợi cho hoạt động chuyển hoá vật chất và năng lượng của cơ thể.

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.