Nhập số nguyên x có trị tuyệt đối không vượt quá 1000. Tìm số nguyên âm chẵn lớn nhất nhỏ hơn x. Dữ liệu vào Số nguyên x Kết quả In ra màn hình số nguyên âm chẵn lớn nhất tìm được Pascal
1 câu trả lời
uses crt;
var x: longint;
begin
clrscr;
readln(x);
if x > -2 then write(-2) else begin
if x mod 2 = 0 then write(x - 2) else write(x - 1);
end;
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
