readln trên end dùng để ngừng chương trình để xem kết quả
:4:2 có nghĩa là cách 4 con trỏ và lấy 2 phần thập phân
VD: write(0.362:4:2) sẽ in ra: 0.36
readln trên end dùng để ngừng chương trình để xem kết quả
:4:2 có nghĩa là cách 4 con trỏ và lấy 2 phần thập phân
VD: write(0.362:4:2) sẽ in ra: 0.36
Nêu tác dụng của lệnh Readln và Delay?
Lí giải lệnh write, writeln, readln dùng để làm gì? Mọi người trả lời hộ em ạ
Phân biệt lệnh:
Write với Writeln
Read với Readln
Cho mình hỏi là lệnh tạm ngừng chương trình mình thay readln; thành read; được không ạ ?
Tìm và sửa tất cả các lỗi sai trong chương trình sau :
program Hà 0908
uses crt;
begin
clrscr;
writeln('(2+9)(9+2)/(10+1)= '; (2+9)(9+2)/(10+1)= :4:2');
readln;
end.
Program Vi_du;
Var a,b,c,s: Integer.
Begin
Write(' Nhap chieu dai a=');Reald('a');
Write(' Nhap chieu rong b='); Readln('b');
s:=a*b.
c:=(a+b).2;
Write (' dien tich hinh chu nhat la:','s');
Write('chu vo hinh chu nhat la:',c);
Readln
End.
Tìm lỗi sai và chữa đúng :
Program bai tap;
Var a,b,c, TB = Integer
Const n : 3
Begin
Writeln('nhap vao ba so a,b,c ) ; Readln ( a,b,c )
TB:=(a+b+c)/n;
Writeln('Trung binh cong cua 3 so do la :TB');
Readln
End
khi nào sử dụng lệnh read
viết chương trình có sử dụng câu lệnh điều kiện và câu lệnh lặp:
1) viết chương trình kiểm tra tính chẵn lẻ;
2)viết chương trình tính tổng n số tự nhiên đầu tiên;
3)viết chương trình tính tổng các số chẵn , lẻ của n số tự nhiên đầu tiên
Các bạn giúp mình với