Question

Biết rằng : Mọi số tự nhiên chẵn lớn hơn 2 đều viết được dưới dạng tổng của 2 số nguyên tố . Hãy viết chương trình nhập vào một số chẵn N lớn hơn 2, hãy tìm cặp số nguyên tố có tổng bằng N nếu có nhiều cặp như vậy thì hãy tìm cặp có chứa số nguyên tố nhỏ nhất ( Code pascal)

Answer 1

program thefirstprograms;

uses crt;

var a,b,c:longint;

begin

clrscr;

write('Nhap so thu nhat ');readln(a);

write('Nhap so thu hai ');readln(b);

write('Nhap so thu ba ');readln(c);

if (a>b) and (a>c) then writeln(a,' la so lon nhat')

else if (b>a) and (b>c) then writeln(b,' la so on nhat')

else if (c>a) and (c>b) then writeln(c,' la so lon nhat')

else (a=b=c) then writeln('Ba so bang nhau');

readln

end.