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.

A. 1 2 3 4 5 6 7 8 9 10

8 tháng 4 2022

D. Không đưa ra kết quả gì

8 tháng 4 2022

Đáp án A.

Vì vòng lặp for..do có biến đếm chạy từ 1 đến 10 mà mỗi lần lặp có lệnh in ra màn hình biến đếm i kèm dấu cách, nên đáp án là A

b: uses crt;

begin

clrscr;

writeln(sqr(15+5)*sqr(6+4)*(6+4));

readln;

end.

23 tháng 7 2021

em thử đã có lệnh readln chưa

4 tháng 10 2022

em có rồi mà vẫn bị

 

25 tháng 10 2016

Câu 1 :

a) (a+b)*(a+b)*(d+e)

b) a*x*x+b*x*x+c*x

Câu 2: Mình không hiểu đề lắm? Đặt cái gì cơ?

Câu 3:

Uses crt;

Var S,a,b:real;

Begin

clrscr;

Writeln('Nhap chieu dai a = '); Readln(a);

Writeln('Nhap chieu rong b = '); Readln(b);

S := a*b;

Write('Dien tich hinh chu nhat la ', S );

Readln;

End.

25 tháng 10 2016

xin lỗi mk lộn nêu qui tắc đặt ngôn ngữ lập trình trong pascal

 

16 tháng 3 2023

Program HOC24;

var S,n: integer;

begin

s:=1; n:=0;

while s<10 do

begin

n:=n+2;

s:=s+n;

end;

write('S= ' ,s);

readln

end.

15 tháng 11 2021

uses crt;

begin

clrscr;

writeln(10+4*sqr(15-10)/6+4);

readln;

end.

18 tháng 6 2017

Đáp án B