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.

F
👑FISH🐟
CTVHS VIP
10 tháng 1

Bạn nên hỏi đàng hoàng !

Bị rảnh tay à

tôi rảnh thì tôi mới làm thế này chứ , tôi ko rảnh thì nhắn làm gì ! hỏi câu hỏi thừa thật

à hiểu rồi :)

chắc chắn có kế hoạch :)

17 tháng 5 2021

Mình có bị nhưng có cách giải quyết đấy !

Bạn uninstall bản free pascal đấy đi rồi tải bản khác hoặc bạn có thể update cũng được

17 tháng 5 2021

mình làm rồi mà không được bạn

18 tháng 10 2016

câu 1:

var x:string

     y:integer

Câu 2:

var a,b:integer

begin

write('hay nhap gia tri cua a')

read(a)

wrietln('hãy nhập giá trị b')

read(b)

t:=a+b

writeln('tông cua a va b la',t)

 

18 tháng 10 2016

? đây là toán mà

22 tháng 11 2021

Hình như là để xóa bài đã lưu thì phải. Em cũng ko biết lắm. Em học lớp 4 nha. Chúc chị học tốt nhé. Mai thi đừng có trượt là đc. Ko bố mẹ lại buồn. Chúc chị thi tốt. 

@@ Ơ Kìa Tui con Trai Mà :))

Dù Sao thì Cũng cảm ơn Bạn Nhé :>>

9 tháng 10 2025

chấm mắm tôm đi o_O


19 tháng 9 2025

k

19 tháng 9 2025

i

27 tháng 5 2021

Program Xoa_mang;

uses crt;

var m:array[1..100] of integer;

n,i,k:byte;

begin

Write(‘So phan tu cua day: ‘);readln(n);

for i:=1 to n do

Begin

write(‘M[‘,i,’]=’);

readln(M[i]);

end;

write(‘Nhap phan tu can xoa: ‘);readln(k);

for i:=k to n-1 do m[i]:=m[i+1];

for i:=1 to n-1 do write(m[i],’  ‘);

readln

end.