Câu 1: Các em làm 2 bài dưới đây để được cộng điểm. Làm vào pascal nếu đúng thì được cộng 2 điểm, làm vào nơi khác thì cộng 1 điểm 1.Tìm giá trị lớn nhất của 4 số gợi ý : nhập 4 số a,b,c,d vào pascal Max:= a; nếu Max < b thì Max:= b; nếu Max < c Thì Max:= c; nếu Max < d Thì Max:= d; Writeln ('Gia tri lon nhat la: ', Max); các em thêm vào cho hoàn chỉnh bài trên
2 câu trả lời
uses crt;
var a,b,c,d,max:longint;
begin
clrscr;
readln(a,b,c,d);
max:=a;
if max<b then max:=b;
if max < c then max:=c;
if max<d then max:=d;
write('Gia tri lon nhat: ',max);
readln;
end.
program tim_max;
uses crt;
var a,b,c,d,max:longint;
begin
clrscr;
Max:= a;
nếu Max < b thì Max:= b;
nếu Max < c Thì Max:= c;
nếu Max < d Thì Max: = d;
Writeln ('Gia tri lon nhat la: ', Max);
readln;
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
