chuyen sang c++ program baitap; uses crt; var x,y,i,m,t: Integer; begin clrscr; writeln('Nhap so tu nhien x: '); readln(x); while (x < 4) or (x > 53) do begin writeln('Ban chi duoc nhap 4 <= x < 53, vui long nhap lai: '); readln(x); end; writeln('Nhap so tu nhien y: '); readln(y); while (y < 59) or (y > 121) do begin writeln('Ban chi duoc nhap 59 < y <= 121, vui long nhap lai: '); readln(y); end; writeln(); writeln('Cac so le chia het cho 3 tu x den y la: '); for i := x to y do begin if (i mod 2 <> 0) then begin if (i mod 3 = 0) then write(i,' '); end; end; writeln(); t := 0; writeln(); writeln('Cac so chinh phuong m voi x < m < y la: '); for i := x+1 to y-1 do begin m := round(sqrt(i)); if (m*m = i) then begin t := t + 1; write(i,' '); end; end; writeln(); writeln('Co tat ca la ',t,' so chinh phuong'); readln; end.

\begin{array}{c} \color{#db1616}{\texttt{#Khoadang09}} \end{array}

- Trên windows dùng hàm clrscr() trong thư viện conio.h, trong KALI LINUX thì dùng clear() trong ncurses.h

*Code :

#include <iostream>
#include <conio.h>
#include <ncurses.h>
#include <cmath>
using namespace std;
int x,y,i,m,t=0;
int main(){
    clear();
    cout << "Nhap so tu nhien x: "; cin >> x;
    while ((x < 4) or (x > 53)){
        cout << "Ban chi duoc nhap 4 <= x < 53, vui long nhap lai: ";
        cin >> x;
    }
    cout << "Nhap so tu nhien y: "; cin >> y;
    while ((y < 59) or (y > 121)){
        cout << "Ban chi duoc nhap 59 < y <= 121, vui long nhap lai: ";
        cin >> y;
    }
    cout << endl;
    cout << "Cac so le chia het cho 3 tu x den y la: " << endl;
    for (i=x;i<=y;i++) 
        if (i%2!=0) 
            if (i%3==0) cout << i << " ";
    cout << endl;
    cout << "Cac so chinh phuong m voi x < m < y la: " << endl;
    for(i=x+1;i<y;i++){
        m = round(sqrt(i));
        if (m*m==i){
            t++;
            cout << i << " ";
        }
    }
    cout << endl;
    cout << "Co tat ca la " << t << " so chinh phuong" << endl;
    getch();
    return 0;
}