K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

16 tháng 10 2020

21 tháng 10 2020

program tinh_toan;

uses crt;

begin

clrscr;

writeln('nhap so a:',a:6:2); readln(a);

writeln('nhap so b:',b:6:2); readln(b);

tich:=a*b;

hieu:=a-b;

tong:=a+b;

thuong:=a/b;

writeln('tich 1 so bang:',tich:6:2);

writeln('tong 2 so bang:'tong:6:2);

writeln('hieu 2 so bang:'hieu:6:2);

writeln('thuong 2 so bang:',thuong:6:2);

readln

end.

13 tháng 10 2021

13 tháng 10 2021

Cách khác(Dùng bằng C++)

#include <bits/stdc++.h>

using namespace std;

double a,b;

int main()

{

cin>>a>>b;

cout<<"Tong la:"<<fixed<<setprecision(2)<<a+b<<endl;

cout<<"Tich la:"<<fixed<<setprecision(2)<<a*b;

return 0;

}

uses crt;

var n,t1:integer;

s:real;

begin

clrscr;

t1:=0;

s:=1;

repeat

readln\(\left(n\right)\);

if n mod 2=0 then t1:=t1+n

else s:=s*n;

until n=0;

writeln\(\left(t1\right)\);

writeln\(\left(s:4:2\right)\);

readln;

end.

31 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,s,p;

int main()

{

cin>>a>>b;

s=a+b;

p=a*b;

cout<<"Tong la:"<<s<<endl;

cout<<"Tich la:"<<p;

return 0;

}

QT
Quoc Tran Anh Le
Giáo viên
18 tháng 11 2023

Tạo chương trình như sau:

13 tháng 11 2021

uses crt;

var a,b:real;

begin

clrscr;

readln(a,b);

writeln(a+b:4:1);

readln;

end.

23 tháng 5 2022

program b1;

uses crt;

var a,b,s:real;

begin

clrscr;

writeln('Nhap hai so a va b: ');

readln(a,b);

s:=a+b;

write('Tong cua hai so a va b la: ',s:1:1);

readln;

end.

 

P/S: phần lưu lẫn đặt tên người dùng nào cũng đều làm được.
+ Chọn Save as ở phần File phía góc trái trên cùng rồi đặt tên.

29 tháng 4 2021

Program HOC24;

var a: array[1..32000] of integer;

i,n,d: integer;

begin

write('Nhap N: ');

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

write('Day vua nhap la: '); 

for i:=1 to n do write(a[i],' '); writeln;

d:=0;

for i:=1 to n do if a[i]>0 then d:=d+1;

write('Co ',d,' so duong');

readln

end.

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

if (a<b) cout<<a;

return 0;

}

5 tháng 12 2021

chương trình có chạy được không vậy bạn, mình thấy một đống lỗi rồi đấy

14 tháng 3 2023

#include <bits/stdc++.h>
using namespace std;
int main ()
{
    int a[32];
    int n,i,s;
    cout<<"nhap so phan tu cua mang ";
    cin>>n;
    cout<<"nhap cac phan tu cua mang ";
    for (i=1; i<=n; i++)
    {
        s=0;
        cin>>a[i];

    }
    for(i=1; i<=a[i]; i++) s=s+i;

    cout<<s;
    return 0;
}

 

 

14 tháng 3 2023

Program HOC24;

var i,n: integer;

a: array[1..1000] of integer;

t: longint;

begin

write('Nhap n: '); readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(i);

end;

t:=0;

for i:=1 to n do t:=t+a[i];

write('Tong la: ',t);

readln

end.

19 tháng 12 2021

2:

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a%b<<endl;

cout<<a/b;

return 0;

}