Viết câu lệnh while - do 1. Tính tổng dãy số chẵn từ 1,2,3,4,5,6,7,8,9,10 2. Tính bình phương dãy số chẵn từ 1,2,3,4,5,6,7,8,9,10

1 câu trả lời

1.

i:=0;tong:=0;

while i < = 10 then

begin

tong:=tong+i;

i:=i+2

end;

writeln(tong);

2.

i:=0;tong:=0;

while i < = 10 then

begin

tong:=tong+i;

i:=i+2

end;

tong:=tong*tong

writeln(tong);

Nhớ cho mik câu tlhn nha