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.

9 tháng 12 2018

program tinh_tong_tb;

uses crt;

var a,b,c,tong,tb:real;

begin

clrscr;

write('nhap so a'); readln(a);

write('nhap so b'); readln(b);

write('nhap so c'); readln(c);

tong:=a+b+c;

tb:=(a+b+c)/3;

write('tong 3 so la',tong);

write('trung binh 3 so la',tb);

readln

end.

18 tháng 12 2018

var a,b,c,t,tb:real;

begin

write('a=');readln(a);

write('b=');readln(b);

write('c=');readln(c);

t:=a+b+c;

tb:=(a+b+c)/3;

writeln(' Tong 3 so tren la: ',t);

writeln(' Trung binh 3 so tren la: ',tb);

readln;

end.

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

a:=sqr(a);

b:=sqr(b);

c:=sqr(c);

writeln((a+b+c)/3:4:2);

readln;

end.

19 tháng 2 2022

dạ cho em hỏi sqc là gì vậy ạ :<

Câu 1: 

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

write(a+b);

readln;

end.

Câu 2:

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

writeln(a+b-c);

readln;

end.

Câu 3: 

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a-b);

readln;

end.

Câu 4: 

uses crt;

var x,y,z:integer;

begin

clrscr;

readln(x,y,z);

writeln((x+y)*z);

readln;

end.

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

21 tháng 10 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<fixed<<setprecision(2)<<1/(a*1.0+b*1.0);

return 0;

}

uses crt;

var a:array[1..100]of real;

i,n:integer;

t:real;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

t:=0;

for i:=1 to n do 

t:=t+a[i];

writeln('Tong cua day la: ',t:4:2);

writeln('Trung binh cong cua day la: ',t/n:4:2);

readln;

end.

10 tháng 5 2021

Em cảm ơn ạ!

21 tháng 10 2021

Câu 1: 

#include <bits/stdc++.h>

using namespace std;

double a,b,c;

int main()

{

cin>>a>>b>>c;

cout<<fixed<<setprecision(2)<<a*b*c;

return 0;

}

14 tháng 10 2021

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)

 

 

 

 

13 tháng 10 2021

Câu 2: 

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a-b;

return 0;

}