K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

23 tháng 3 2023

Sửa:

S:=0;n:=0;

while s<=10 do

Begin

   n:=n+1;

   s:=s+n;

End;

17 tháng 3 2022

Program Tinh _gia_tri_bieu_thuc;

 Uses CRT;

Var x: Real;

Begin

Clrscr;

​readln(x);

Writeln(‘Gia tri bieu thuc 12*x – 30 + 12 = ’ , 12 *x – 30 + 12: 5:3');

Write(‘Nhap gia tri x:  ’); 

            Readln

            End.

21 tháng 6 2023

 Mới câu trong đoạn văn sau có một lối sai em hãy tìm và chứa lại cho đúng. Gạch chân lỗi sai đó và viết phần chữa lại vào chỗ trống (10 đ) Vi du 0. He are a doctor.

1. Phong's school is the smallest than->in our school

. 2. How many->much milk would you like?

3. We are pollute->polluting the land, the rivers and the oceans.

4. Is->Are there any eggs in the fridge?

5. She needs some coffee and a little->few biscuits.

11 tháng 11 2021

bạn ghi xuống dòng được ko chứ bạn ghi thế này mình chả hiểu gì cả

 

11 tháng 11 2021

Đề thiếu rồi bạn

26 tháng 4 2023
Program TinhocProgram Tinhoc;
Var i,n,S:realVar i,n,S:real
BeginBegin
      Write(nhap so);      Write("nhap so");
      readln(n);      readln(n);
      i=1;      i:=1;
      while i<n      while i<n do
      begin      begin
            s:=s+i            s:=s+i;
            i:=i+1            i:=i+1;
            end;      end;
            write('Ket qua la: ' S);      write('Ket qua la: ' ,S);
            readln;            readln;
endend.
16 tháng 3 2023

Program Tong__nghich__dao;

Var

n,i:real;

S:Integer;

Begin

Write('Nhap n=');Readln(n);

S:=0;

For i:=1 to n do S:=S+1/i;

Write('Tong can tim la: ', S:6:2);

Readln;

End.

16 tháng 3 2023

:v

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

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

writeln(t);

readln;

end.

13 tháng 3 2023

Program câu 1;

Var n: Integer; s:real;

Begin

Writeln(‘ Nhap gia tri n=’); Readln(n);

S:=0;

While n<0 do

begin

s:=s+n/2; n:=n-1;

end;

write(‘tong s = ‘, s:8:2);

Readln;

End.

13 tháng 3 2023

Lỗi sai:

Program câu 1; -> Tên chương trình không chứa dấu cách trắng.

-> Sửa: Program cau_1;

Writeln(‘ Nhap gia tri n=’); Readln; -> Nhập giá trị cho n nhưng thiếu lệnh đọc n

-> Sửa: 

Writeln(‘ Nhap gia tri n=’); Readln(n);

While n >0 do

s:=s+n/2; n:=n-1;

Cả 2 câu lệnh s:=s+n/2; n:=n-1; đều nằm trong vòng lặp while..do nên cần begin...end con. 

-> Sửa 

While n >0 do

begin

s:=s+n/2; n:=n-1;

end;

 

10 tháng 5 2023

chỉ em câu này dới ạ em cảm ơm ạ

NameError:  name 'S' is not defined Câu 4
SyntaxError: expected ':' Câu 2

A=[3,-9,1,-4,15,7]
S=0
for i in range(len(A)):
    if A[i]%2!=0 :
        S=S+A[i]
print(S)

21 tháng 8 2018

a) uses crt;

b) var dt, r: real;

c) Thiếu readln(r);

d) dt:= pi*sqr(r);

29 tháng 8 2023

Lỗi 1: Dòng uses : crt; - Lỗi cú pháp do dấu hai chấm : không cần thiết. Sửa lại thành uses crt;.

Lỗi 2: Dòng var dt, r = real; - Lỗi khai báo biến không đúng cú pháp. Sửa lại thành var dt, r: real;.

Lỗi 3: Dòng clrscr; - Lỗi cú pháp do sử dụng hàm clrscr trong môi trường không hỗ trợ. Nếu muốn xóa màn hình, có thể sử dụng clrscr trong IDE hoặc xóa dòng này nếu không cần thiết.

Lỗi 4: Dòng writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2); - Lỗi cú pháp do sử dụng sai định dạng khi in giá trị. Sửa lại thành writeln('Dien tich hinh tron co ban kinh ', r:0:2, ' la: ', dt:0:2:2); để in diện tích với đúng định dạng số thập phân.