Thực hành phép gán

Tiết 3 Thực hành
NHẬP XUẤT DỮ LIỆU PHÉP GÁN
Kiểm tra bài cũ :
Câu :1
Câu :2
Bài tập thực hành
Học,học nữa học mãi
Nêu khái niệm về phép gán, cho ví dụ ?
Đáp án câu 1
Biểu thức toán học là gì cho ví dụ ?
Đáp án câu 2
Đáp án câu 1:
Phép gán được dùng để gán giá trị của một biểu thức, một hằng vào một biến.
Phép gán được kí hiệu là := .
Biến := Biểu_thức ;
ví d? minh h?a : a:= 6b*5
Đáp án câu 2 :
Biểu thức (Expression) là một công thức tính toán để có một giá trị theo một quy tắc toán học nào đó.
Ví du minh h?a �: 3 + PI * f ( x) ; trong đó f(x) là hàm
5 / 2 * 3 = ( 5 / 2 ) * 3 = 7.5
18 Div 4 * 4 = ( 18 Div 4 ) * 4 = 16
Viết chương trình giải bài toán. Một đàn gia súc có n con . Số trâu nhiều hơn số bò là k con. Hỏi đàn gia súc có bao nhiêu trâu , và bao nhiêu bò với n và k được nhập từ bàn phím .
Xem thuật giải và giải Bằng ngôn ngữ Pascal
Bài toán
Xem thuật toán
Nếu gọi số trâu là a và số bò là b thì n = a +b pt(1) khi đó k = a - b pt(2)
Hay a - b = k Từ đó suy ra => a = (n+k)/2 và b = n – a trong đó a,b,n,k là các số nguyên dương
điều kiện bài toán là : n > k và biểu thức (n + k)/2 cho kết quả là số nguyên dương.
lời giải bài
bài toán bằng
ngôn ngữ Pascal
Program Tinh_gia_suc;
Uses crt;
var n,k: Word; { Khai bao kieu nguyen duong}
a,b: Real
Begin
Clrscr;
Write(` Ban nhap so gia suc co trong dan n = `); Readln(n);
Write(` Ban nhap so trau nhieu hon so bo k = `); readln(k);
a:=(n+k)/2;
{ a nhan gia tri nguyen duong neu a la le chuong trinh bao loi}
b:= n-a;
{ neu b<0 chuong trinh bao loi do khi nhap ta n Writeln(` Vay so trau la a = ` ,a:8:0,’con’);
Write(` khi do so bo se la b = `,b:8:0,’con’);
Readln;
End.