Những câu hỏi liên quan
Nguyễn Như Quỳnh
Xem chi tiết
Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:54

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,d;

int main()

{

cin>>a>>b>>c>>d;

cout<<a+b+c+d;

return 0;

}

Bình luận (0)
Mai Thị Bảo Phương
Xem chi tiết
Nguyễn Lê Phước Thịnh
7 tháng 12 2021 lúc 23:11

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,d,t;

int main()

{

cin>>a>>b>>c>>d;

t=a+b+c+d;

cout<<t;

return 0;

}

Bình luận (0)
Nguyên 8B
Xem chi tiết
Nguyễn Lê Phước Thịnh
27 tháng 12 2021 lúc 18:59

a: Input: a,b,c

Output: a+b+c và a*b*c

Bình luận (1)
Thảo
Xem chi tiết
quỳnh như
Xem chi tiết
Nguyên 8B
Xem chi tiết
PC Vũ
Xem chi tiết
SukhoiSu-35
10 tháng 5 2021 lúc 20:21

uses crt;

var n, i, j, dem: longint; {Bạn có thể thay longint thành integer nha}

A:array[1..1000] of longint;

begin

clrscr;

Write('Nhap N: '); readln(n);

for i:=1 to n do

begin

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

readln(A[i]);

end;

Write('Cac so nguyen to co trong mang la: ');

for i:=1 to n do

begin

dem:=0;

for j:=2 to A[i]/2 do

if A[i] mod j=0 then dem:=dem+1;

if dem=0 then write(A[i],' ');

end;

end.

Bình luận (0)
Nguyễn Lê Phước Thịnh
11 tháng 5 2021 lúc 11:06

uses crt;

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

i,n,t:integer;

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(t);

readln;

end.

Bình luận (0)
Lê Thị Thu Phương
7 tháng 6 2021 lúc 21:23

uses crt;
var a:array[1..1000000] of longint;
      n,i,s:longint;
begin
      clrscr;
      write('n='); readln(n);
      for i:=1 to n do 
            begin
                  write('a[',i,']: '); readln(a[i]);
                  inc(s,a[i]);
            end;
      writeln('Tong: ',s);
      readln;
end.

Bình luận (0)
Nguyên 8B
Xem chi tiết
Nguyễn Lê Phước Thịnh
27 tháng 12 2021 lúc 17:47

#include <bits/stdc++.h>

using namespace std;

long long p,q;

int main()

{

cin>>p>>q;

cout<<p+q<<" "<<p-q;

return 0;

}

Bình luận (1)
Nguyễn Cảnh Hùng
Xem chi tiết
Đỗ Ngọc Trinh
11 tháng 11 2018 lúc 18:07

Bình luận (0)
Lê Thị Thu Phương
7 tháng 6 2021 lúc 21:04

uses crt;
var a:array[1..1000000] of longint;
      n,i,s:longint;
begin
      clrscr;
      write('Nhap so luong phan tu: '); readln(n);
      for i:=1 to n do 
            begin
                  write('Nhap phan tu thu ',i,': '); readln(a[i]);
                  if a[i] mod 2=1 then inc(s,a[i]);
            end;
      write('Tong cac so le: ',s);
      readln;
end.

Bình luận (0)