Kết quả tìm kiếm

Nêu nội dung và nghệ thuật của các văn bản sau: Tôi đi học (Thanh Tịnh); Trong lòng mẹ (Nguyên Hồng); Tức nước vỡ bờ (Ngô Tất Tố); Lão Hạc (Nam Cao); Cô bé bán diêm (An-đéc-xen); Đánh nhau với cối xay gió (Xéc-van-tét); Chiếc lá cuối cùng (Ơ Hen-ri); Hai cây phong (Ai-ma-tốp);

Ai đó cho ví dụ và giải thích về ứng dụng đó của gương cầu lồi giùm em ạ

Cho đa thức ax^{2}+bx+c (0< a\leq 100;\left | b \right |,\left | c \right |\leq 10^{9}) Viết chương trình tìm giá trị nhỏ nhất của đa thức trên với các hệ số a,b,c cho trước

Ai chỉ em cách xác định yếu tố miêu tả và biểu cảm trong đoạn văn cho trước với ?

uses crt; var n,i,j:integer; s,kt:array[1..10000] of integer; begin clrscr; write('so so hang: ');readln(n); for i:=1 to n do begin write('nhap so thu ',i,' : ');readln(s); end; writeln('sau khi kiem tra: '); for i:=1 to n do begin kt:=0; for j:=2 to s-1 do if s mod j=0 then kt:=kt+1; if kt<>0...

Xin lỗi máy có vấn đề nên làm lại uses crt; var tong,i:integer; b1,b2,b3:array[1..10000] of integer; tb:array[1..10000] of real; hs:array[1..10000] of string; x:byte; begin clrscr; write('Tong so hoc sinh: ');readln(tong); for i:=1 to tong do begin clrscr; repeat write('ten hoc...

Cái trên sai một chút sửa lại: uses crt; var tong,i:integer; b1,b2,b3:array[1..10000] of integer; tb:array[1..10000] of real; hs:array[1..10000] of string; x:byte; begin clrscr; write('Tong so hoc sinh: ');readln(tong); for i:=1 to tong do begin clrscr; repeat write('ten hoc sinh...

uses crt; var tong,i:integer; b1,b2,b3:array[1..10000] of integer; tb:array[1..10000] of real; hs:array[1..10000] of string; x:byte; begin clrscr; write('Tong so hoc sinh: ');readln(tong); for i:=1 to tong do begin clrscr; repeat write('ten hoc sinh thu ',i,' : ');readln(hs)...

ai chỉ em cách sử dụng lệnh setfillpattern(x) với

Khi làm các bài tập pascal em thay có các lệnh như write(#3). vậy mình có thể học mấy cái # trong write ở đâu vậy ạ?

Có nghĩa là: Nếu tính tổng các số từ 1 tới n thì ta cho biến i chạy tới n Nhưng nếu tính tổng các số lẻ từ 1 đến n thì ta vẫn cho biến i chạy tới n nhưng phải xét biến i đó có phải là số lẻ không bằng cách đưa biến i đó chia 2, nếu i chia hai dư 1 thì biến i đó là số lẻ và ta cộng i vào biến...

Xét phương trình có dạng x+y+z=n (với x,y,z,n là các số nguyên dương) Phương trình này có thể vô nghiệm,có một hoặc vô số bộ nghiệm (x,y,z) mà trong đó các số x,y,z đều là số nguyên dương (x,y,z>0). Hãy liệt kê ra tất cả các bộ nghiệm nguyên dương x,y,z của phương trình trên (với x<y<z) và cho...

Cho biểu thức P= [1/(1*3)] + [1/(3*5)] + [1/(5*7)] +...+{1/[(2n-1)*(2n+1)]} Tính giá trị của P với n cho trước

Tính tổng các số lẽ từ 1 đến N: uses crt; var tong,n,i:integer; begin clrscr; write('nhap n: ');readln(n); for i:=1 to n do if (i mod 2=1) then tong:=tong+i; write('tong cac so le tu 1 cho den ',n,' la: ',tong); readln; end.

em năm nay lớp tám học pascal nhưng lên mạng tìm nhiều cái thiếu quá. Ai chỉ cho em tài liệu hay phần mềm hướng dẫn học pascal (bao gồm cả đồ họa) không?