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.

uses crt;

var a,b:integer;

begin

clrscr;

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

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

writeln('Hieu cua hai so la: ',a-b);

readln;

end.

5 tháng 5 2021

Cảm ơn ạ

 

22 tháng 4 2023

program TongSoChanTrongDay;

var

      n, i, tong: integer;

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

begin

      tong := 0;

      write('Nhap so phan tu cua day: ');

      readln(n);

      for i := 1 to n do

      begin

            write('Nhap phan tu thu ', i, ': ');

            readln(a[i]);

            if a[i] mod 2 = 0 then

                  tong := tong + a[i];

      end;

      writeln('Tong cac phan tu chan trong day la: ', tong);

      readln;

end.

3 tháng 5

fgfgfgfgfgfggfgfgfggggfgf

30 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)/3;

return 0;

}

3 tháng 5

nbbnbnbbnn\(\dfrac{^{ }}{ }\)

14 tháng 3 2023

15 tháng 3 2023

program TongUoc;

uses crt;

var
  N, i, Tong: integer;

begin
  clrscr;
  Tong := 0;
  write('Nhap so tu nhien N: ');
  readln(N);

  // Tinh tong cac uoc cua N
  for i := 1 to N do
  begin
    if N mod i = 0 then
    begin
      Tong := Tong + i;
    end;
  end;

  writeln('Tong cac uoc cua ', N, ' la: ', Tong);

  readln;
end.

1 tháng 12 2021

giúp em với

 

1 tháng 12 2021

Caua1:

program caumot;

begin

writeln('lop 8A chao ban!');

end.

Câu 2:

program cauhai;

int a,b,c :real;

begin

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

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

c= a+b;

write('Tong hai so a b la:',c);

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;

}

18 tháng 5 2022

B2 tong <- 0;

B3 in tong

B4 nếu 60 mod a[i]=0; thì tong <- tong + a[i] 

B5 nhập n

18 tháng 5 2022

Sắp xếp thuật toán giải bài toán trên

Viết chương trình Pascal hoàn chỉnh

19 tháng 12 2021

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,t;

int main()

{

cin>>a>>b>>c;

t=0;

if (a%2!=0) t=t+a;

if (b%2!=0) t=t+b;

if (c%2!=0) t=t+c;

cout<<t;

return 0;

}