Question

1) Nêu cú pháp của câu lênh điều kiện

2) Viết chương trình tính tổng 50 số tự nhiên đầu tiên

3)viết chương trình in ra các số chẵn của 50 số tự nhiên đầu tiên

Bạn naò giúp mình trả lời câu hỏi này với

mình cảm ơn nhiều lắm

Answer 1

1:

-Dạng thiếu

if <điều kiện> then <câu lệnh>;

-Dạng đủ

if <điều kiện> then <câu lệnh 1>

else <câu lệnh 2>;

2: Bạn nên nhớ là số tự nhiên đầu tiên là số 0 nhé

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=0 to 49 do

t:=t+i;

writeln('tong cua 50 so tu nhien dau tien la: ',t);

readln;

end.

3:

uses crt;

var i:integer;

begin

clrscr;

writeln('cac so chan trong 50 so tu nhien dau tien la: ');

for i:=0 to 49 do

if i mod 2=0 then write(i:4);

readln;

end.