Ngày tải lên: 25/12/2014, 09:23
bài 17 : bài tập với tệp
... 'C:\DULIEU.INP’); - Mở tệp ra để ghi; REWRITE (tep2 ); CÁC BƯỚC: THỂ HIỆN BẰNG PASCAL Nhấn F3 để mở tệp BAITAP.INP xem nội dung. Nội dung tệp BAITAP.INP Nhap vao bao nhieu so : 6 Nhap so thu ... báo; Program Bai2 ; Uses crt; Var tep: TEXT; A:ARRAY[1 100] of Integer; S,i,n:Integer; - Gán tên tệp; Begin Clrscr; ASSIGN (tep, 'D:\TP\BAITAP.INP’); - Mở tệp ra để đọc; RESET (tep) ; B i ... dãy số đó vào tệp có tên BAITAP.INP - Khai báo; Program bai1 ; Uses crt; Var tep2 : TEXT; A:ARRAY[1 100] of Integer; i,n:Integer; - Gán tên tệp; Begin Clrscr; ASSIGN (tep2 , 'C:\DULIEU.INP’); -...
Ngày tải lên: 24/06/2013, 01:25
Bài tập tổng hợp Pascal pot
... (4)(2( −−− −−− xxx xxx Lưu hành nội bộ 6 Trường THPT Tây Nam Bài tập Pascal 11 Phần 2: BÀI TẬP VỀ CÁC KIỂU DỮ LIỆU VÀ CẤU TRÚC CHƯƠNG TRÌNH PASCAL Bài 22: Hãy định nghĩa một kiểu dữ liệu mới chỉ chấp ... hai ma trận đó. Lưu hành nội bộ 7 Trường THPT Tây Nam Bài tập Pascal 11 Bài 9: Vì sao bạn phải biết và nhớ các từ khoá của ngôn ngữ Pascal? Bài 10: Hãy phân biệt từ khoá với tên chuẩn. Bài 11: ... màn hình giá trị trung bình cộng S của 3 số đó. Lưu hành nội bộ 3 Trường THPT Tây Nam Bài tập Pascal 11 Phần 6: BÀI TẬP KIỂU MẢNG (61)-Bài mảng 1: Viết chương trình nhập vào một mảng(một dãy...
Ngày tải lên: 03/07/2014, 13:20
Bài tập lập trình pascal doc
... la: ',t:0:2); readln; end. Bài 2: program bai2 ; uses crt; var i,n,k:integer; x:real; a:array[1 50]of real; begin 47 Bài 12: program bai1 2; uses crt; var i,n:integer; tong:real; begin ... readln; end. III.CÂU LỆNH LỰA CHỌN CASE-OF: Bài 1: program bai1 ; uses crt; var n:byte; begin clrscr; write('n= '); 21 end. Bài 6: program bai6 ; uses crt; var hoten,sinhnhat,tenlop:string; begin ... writeln('Trung binh nhan cua ',n,' so tren la: ',t/n:0:2); readln; end. Bài 33: program bai3 3; uses crt; var i,j,n,tonguoc:integer; begin clrscr; write('n= '); readln(n); ...
Ngày tải lên: 09/07/2014, 04:20
Giáo án Tin Học lớp 11: BÀI TẬP KIỂU BẢN GHI I doc
... toạ độ trọng tâm của tam giác đó. Bài làm: a. TYPE DIEM=record x, y: real; End; b.program Bai1 b; Type DIEM=record x, y: real; End; Var A,B,C,G:Diem; BEGIN Clrscr; Write(’nhap toa...
Ngày tải lên: 07/08/2014, 22:23
Bài tập chuyên đề Pascal potx
... :=n MOD 1000; Write(' ', n DIV 100); n :=n MOD 100; BÀI TẬP PASCAL Chủ nhật, 30/11/2008 12:23 pm BÀI TẬP PASCAL Chương 1. Bài 1 Program Ca_dao; Begin Writeln('Trong dam gi...
Ngày tải lên: 14/08/2014, 09:20
Bạn có muốn tìm thêm với từ khóa: