Trang chủ Tin Học Lớp 12 Viết chương trình pascal nhập vào 3 số a,b,c nhập...

Viết chương trình pascal nhập vào 3 số a,b,c nhập từ bàn phím in ra kết quả lớn nhất câu hỏi 1753372 - hoctapsgk.com

Câu hỏi :

Viết chương trình pascal nhập vào 3 số a,b,c nhập từ bàn phím in ra kết quả lớn nhất

Lời giải 1 :

Program so_lon_nhat;

Uses Crt;

Var a,b,c :Integer;

Begin

Clrscr;

Writeln (‘Hay nhap so a: ’);

Readln (a);

Writenln (‘Hay nhap so b: ’);

Readln (b);

Writeln (‘Hay nhap so c: ’);

Readln (c);

If (a>b) and (a>c )then writeln (‘ a la so lon nhat’);

If (b>a )and (b>c) then writeln (‘b la so lon nhat’);

If (c>a) and (c>b )then writeln (‘c la so lon nhat’);

Readln;

End.

Thảo luận

-- chương trình sẽ sai
-- Sai ở đâu để mk sửa
-- khi có 2 điều kiện thì mỗi điều kiện phải để trong dấu ( )

Lời giải 2 :

uses crt;
var max,a,b,c:longint;
begin
clrscr;
   write('a=');readln(a);   
   write('b=');readln(b);   
   write('c=');readln(c);
   max:=a;
   if b>max then max:=b;
   if c>max then max:=c;
   writeln('Max= ',max);
readln
end.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 12

Lớp 12 - Năm cuối ở cấp tiểu học, năm học quan trọng nhất trong đời học sinh trải qua bao năm học tập, bao nhiêu kì vọng của người thân xung quanh ta. Những nỗi lo về thi đại học và định hướng tương lai thật là nặng. Hãy tin vào bản thân là mình sẽ làm được rồi tương lai mới chờ đợi các em!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK