Cú pháp While<điều kiện> do<câu lệnh>

Ví dụ

While a>20 do a:=a+1;

Hoạt động

- Bước 1. Kiểm tra điều kiện

- Bước 2. Nếu điều kiện sai, câu lệnh sẽ bị bỏ qua và việc thực hiện câu lệnh lặp kết thúc. Nếu điều kiện đúng, thực hiện câu lệnh và quay lại Bước 1

a) (3x-1)²-(x-3)²=0 

ĐKXĐ: \(|^{3x-1\ne0}_{x-3\ne0}\Leftrightarrow|^{x\ne\dfrac{1}{3}}_{x\ne3}\)

<=>9x²-6x+1-(x²-6x+9)=0

<=>9x²-6x+1-x²+6x-9=0

<=>8x²-8=0

<=>8x²=8

<=>x²=1

<=>x²=\(\pm1\)(TMĐK)

Bài của bạn Hồ Đức Việt đúng nhưng đề bài không cho rõ là đến số bao nhiêu nên phải nhập số đó vào ctr chứ không phải cho chạy luôn. Còn đề cho mình hỏi 2 vòng lặp không cần có được không chứ mình chưa rõ dùng 2 vòng lặp kiểu gì? nếu dùng 2 vòng thì bạn muốn in ra kết qua nhiều lần hay thế nào? :)

program day_so;

uses crt;

var s,i,n:integer;

begin

writeln('nhap so cuoi cua day');readln(n)

for i:=1 to n do s:=s+i;

writeln('Ket qua day so la', s:0:0); readln

end.

1.3 A chứ ạ? 

 nhìn sót speaking nên viết nhầm maths ra sau ạ. Em lỡ sai chút thôi mà :)) sorry everyone =)

dạ em lỡ nhìn sót ạ :) thông cảm nha mn

1.        Sắp xếp các từ sau để tạo thành câu hoàn chỉnh

          1.1.        in/ Tommy/ dancing/ the/ loves/ disco.

→ …………………Tommy loves dancing in the disco………………….

          1.2.        English/ My/ speaking/ Maths/ loves/ teacher

→ ………………………My English teacher loves Maths…………………………….

          1.3.        doesn’t/ early/ friend’s/ sister/ My/ like/ getting/ up

→ ……………………My friend's sister doesn't like getting up early …………….

          1.4.        the/ I/ getting/ dressed/ mornings/ like/ in

→ ………………I like getting dressed in the mornings……………………….

          1.5.        a/ at/ bath/ aunt/ having/ nights/ loves/ James’

→ ………………………James's aunt loves having a bath at nights……………….