u 3: Đánh dấu [x] vào ô đúng hoặc sai tương ứng trong các câu lệnh Pascal trong chương trình tính tổng 10 số tự...

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.

Mua vip

Tiểu yêu tinh cute

18 tháng 4 2023

u 3: Đánh dấu [x] vào ô đúng hoặc sai tương ứng trong các câu lệnh Pascal trong chương trình tính tổng 10 số tự nhiên đầu tiên, nếu sai sửa lại?

Câu lệnh Đúng Sai Sửa lại

Program Chuong trinh

Var i,s : real;

Const n:=10;

Begin

Wile i <=n do;

Begin

S:=s+i

i =i+1

End.

Writeln(s)

Readln

End;

giúp mik với mình cần gấp ạ

#Tin học lớp 8

Các câu hỏi dưới đây có thể giống với câu hỏi trên

Hàn Tiểu Hy

17 tháng 5 2020

Đánh dấu [X] vào ô trống hoặc sai tương ứng trog các câu lệnh trong chương trình tính tổng 100 số tự nhiên đầu tiên, nếu sai sửa lại câu lệnh Đúng Sai Sửa lại Program Chuong trinh Var i,s : real; Const n:=100; Begin Wile i<=n do; Begin S:=s+i i =i+1 ...

Đọc tiếp

#Tin học lớp 8

Nguyễn Trúc

12 tháng 5 2019

Đánh dấu {X} vào ô đúng hoặc sai tương ứng trong các câu lệnh Pascal trong chương trình tính tổng 10 số tự nhiên đầu tiên, nếu sai sửa lại Câu lệnh Đúng Sai Sửa lại Program Chuong trinh Var i,s :real; Const n:=10; Begin S:= s+1 i=i+1 End. Writeln(s) ...

Đọc tiếp

#Tin học lớp 8

The8BitImage

1 tháng 7 2019

1) Sai --> Program Chuong_trinh;

2) Đúng

3) Đúng

4) Đúng

5) Sai --> s:=s+1;

6) Sai -->i:=1+1;

7) Sai --> End;

8 và 9) Sai --> Writeln(s); và Readln;

10) Sai --> End.

Đúng thì like cho mình nha :)))

Đúng(1)

Minh Lệ

30 tháng 8 2019

Câu lệnh	Đúng	Sai	Sửa lại
Program Chuong trinh		x	program chuongtrinh;
var i,s : real;	x
const n:=10;	x
begin	x
s:=s+1		x	s:=s+1;
i:=i+1		x	i:=i+1;
end;		x	end;
writeln(s)		x	writeln(s);
readln	x
end;		x	end.

Đúng(4)

Ngọc Trâm

4 tháng 5 2017

Các lệnh khai báo biến sau đây là đúng hay sai ? Nếu sai hãy chữa lại cho đúng 1 . for i:= 10 to 1 do writeln('a');....................................................................... 2 . s: =0; n: = 1:while <= 10 do n := n+1; s : = s + n;......................................................................... 3 . a: array[1..100] of real ;...................................................................................................... 4 . a: = 1 ; while a < 2...

Đọc tiếp

#Tin học lớp 8

Thanh Nga

6 tháng 5 2017

1: Sai. for i:=1 to 10 do writeln('a');

Đúng(0)

Trần Ngọc An Nhiên

4 tháng 10 2017

Nêu các trường hợp giao tiếp giữa người và máy tính? Các câu lệnh cụ thể tương ứng với các trường hợp đó?

Giúp em với ạ

#Tin học lớp 8

Vy Nguyễn Khánh

24 tháng 6 2020

Cách khai báo sau đây là đúng hay sai? Nếu sai hãy sửa lại:

Var x:array [10,13] of integer;

S:=0; n:=0; while S < for do n:=n + 1; S:= s+n

For i:=1 to 10 do; writeln ('A')

Var x: real; begin for x:=1 to 10 do writeln ('A'); end.

#Tin học lớp 8

Phan Tiến Đạt

25 tháng 6 2020

A/ Sai.

Sửa: Var x:array[10..13] of integer;

B/ Sai.

Sửa: S:= 0; n:= 0; while S < 50 do

begin n:= n + 1; S:= S + n; end;

C/ Sai.

Sửa: for i:= 1 to 10 do writeln('A');

D/ Sai.

Sửa x: integer; begin for x:= 1 to 10 do writeln('A'); end.

Đúng(0)

Nguyễn Phương Hiểu Nghi

8 tháng 4 2018

Câu 1: Điền X vào các ô Đúng hoặc Sai sao cho phù hợp và sửa lại cho đúng (nếu sai)? Câu Đúng Sai Sửa lại a) for i=1 to 10 do writeln('A'); b) var X: Array[5...10] Of Char; c) X:=10; while X=10 do X:=X+5; d) s:=0; for i:=1.5 to 10.5 do s:=s+i; ...

Đọc tiếp

#Tin học lớp 8

Đào Nguyên

19 tháng 3 2022

Giải thích mấy câu lệnh này giúp tui vs Program Tong_chu_so; Var s:string; i:byte; p:integer;{bien luu tong} begin write('Nhap so: ');readln(s); for i:=1 to length(s) do p:=p+ord(s[i]); p:=p-48*length(s); writeln(p); readln End.

#Tin học lớp 8

Sương"x Trần"x

21 tháng 11 2017

Thuật toán Bước 1: Tính tổng số tiền T khách hàng đã mua sách. Bước 2: Nếu T_> 100000, số tiền phải thanh toán là 70% *T; Ngược lại, số tiền phải thanh toán là 90%*T Bước 3: In hóa đơn Dựa vào thuật toán viết chương trình in kết quả ra màn hình sử dụng câu lệnh điều kiện IF Giúp zum nhenk dag cần gấp...

Đọc tiếp

#Tin học lớp 8

duong nguyenvan

24 tháng 11 2017

Program bai1;

uses crt;

var T: real;

begin

clrscr;

write('nhap T ='); readln(T);

if T > 10000 then writeln('so tien thanh toan la : ' ,0.7*T:4:2 ,' VND')

else

writeln('so tien thanh toan la :' ,0.9*T:4:2 , ' VND');

readln;

end.

Đúng(0)

Ba chú heo con

20 tháng 5 2020

Program tong_so_le;

Uses crt;

Var S,N,I:Integer;

Xữa chương trình sau( nếu sai)

Begin

Clrscr;

Write('Nhap N ');Readln(N);

S:=0;

For I:=1 to N do If (I mod 2<>0) then

S:=S+I;

Writeln('Tong cac so le la ',S); Readln;

End.

Giup mik nha các bn

Thanks

#Tin học lớp 8

Câu	Đúng	Sai	Sửa lại
a) for i=1 to 10 do writeln('A');
b) var X: Array[5...10] Of Char;
c) X:=10; while X=10 do X:=X+5;
d) s:=0; for i:=1.5 to 10.5 do s:=s+i;
e)var A:= array [1..50] of integer;

Câu lệnh	Đúng	Sai	Sửa lại
Program Chuong trinh
Var i,s : real;
Const n:=10;
Begin
While i <=n do;
Begin
S:=s+i
i=i+1
End.
Writeln(s)
Readln
End;

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Câu lệnh	Đúng	Sai	Sửa lại
Program Chuong trinh
Var i,s :real;
Const n:=10;
Begin
S:= s+1
i=i+1
End.
Writeln(s)
Readln
End;

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP