5^2 < cái kia

\(5^2=3^2+4^2\)

Câu 1:

Uses crt;

Var a,b:real;

Begin

Clrscr;

Readln(a);

Readln(b);

Writeln((a+b)/(a-b));

Readln

End.

Câu 2:

Uses crt;

Var a,b,c:real;

Begin

Clrscr;

Readln(a);

Readln(b);

Readln(c);

Writeln(a*a+b*b+c*c);

Readln

End.

#include <bits/stdc++.h>

using namespace std;

long long x,y,tam;

int main()

{

cin>>x>>y;

cout<<"x truoc khi doi la:"<<x<<endl;

cout<<"y truoc khi doi la:"<<y<<endl;

tam=x;

x=y;

y=tam;

cout<<"x sau khi doi la:"<<x<<endl;

cout<<"y sau khi doi la:"<<y;

return 0;

}

C1:

khai báo:

      program  hieu_a_va_b   ("tự đặt tên cái này ko cần thiết)

      uses crt;

      var a, b : integer

phần thân:

       begin

            writeln ("nhap so a");  read(a);

            writeln ("nhap so b");  read(b);

             writeln ("hieu cua hai so la: a - b=" , a - b);

        end.

C2:

khai báo:

      program    tinh_ba_so

      uses crt;

      var a, b, c : integer

phần thân:

       begin

            writeln ("nhap so a");  read(a);

            writeln ("nhap so b");  read(b);

            writeln ("nhap so c");  read(c);

             writeln ("ket qua cua phep tinh a+b-c la" , a+b-c);

        end.

C3:

khai báo:

      program    tinh_ba_so

      uses crt;

      var x, y, z : integer

phần thân:

       begin

            writeln ("nhap so x");  read(x);

            writeln ("nhap so y");  read(y);

            writeln ("nhap so z");  read(z);

             writeln ("ket qua cua phep tinh (x+y)*z la") , (x+y)*z);

        end.

nhớ chạy thử chương trình nha. xem có lỗi ko.

(nhớ tick cho mk nha)

a: 54

b: 8

d: 9

e: 4+5

f: 920

g: 9 20

A= 155:5=31

B= 155:5 (Lấy phần nguyên)= 31

C= 155:5 (Lấy số dư) = 0

D=1255:20 (Lấy phần nguyên)= 62

E=1255:20(Lấy số dư) = 15

(nhớ tick nha)

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a-b;

return 0;

}

a: Input: Hai số a,b

Output: UCLN của hai số này

b:

-Bước 1: nhập a,b

-Bước 2: Nếu a>b thì

+Bước 2.1: r←a mod b;

+Bước 2.2: r←a mod b;

+Bước 2.3: a=b; 

+Bước 2.4: b=r;

+Bước 2.5: Nếu r<>0 thì quay lại bước 2.2

+Bước 2.6: Xuất b

-Bước 3: Nếu a<=b thì 

+Bước 3.1: r←b mod a;

+Bước 3.2: r←b mod a;

+Bước 3.3: b=a; 

+Bước 3.4: a=r;

+Bước 3.5: Nếu r<>0 thì quay lại bước 3.2

+Bước 3.6: Xuất a

-Bước 4: Kết thúc

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln((a+b)/3-5*a:4:2);

readln;

end.