Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

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

b: 

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<t;

return 0;

}

Linh Linh
Xem chi tiết
Dương Ngọc Nguyễn
9 tháng 5 2021 lúc 22:12

program mang;
uses crt;
var n,i,chan, le,max,min: Integer;
a:array[1..100] of integer;
begin
write('nhap so phan tu ');read(n);
for i:=1 to n do
begin
write('nhap so thu ',i); readln(a[i]);
end;
max:=a[1]; min:=a[1]; chan:=0;le:=0;
for i:=1to n do
begin
if a[i] > max then max:=a[i];
if a[i] < min then min:=a[i];
if a[i] mod 2 = 0 then chan:=chan+1
else le:=le+1;
end;
writeln('max la: ',max);
writeln('min la: ',min);
writeln('so phan tu chan: ',chan);
writeln('so phan tu le: ',le);
readln
end.

Hồ Thị Xuân Nhi
Xem chi tiết
Duong hanh trang
14 tháng 11 2018 lúc 21:29

Lập trình đơn giảnLập trình đơn giảnLập trình đơn giản

Duong hanh trang
14 tháng 11 2018 lúc 21:39

program Solonnhat;

uses CRT;

var a,b,c:real;

begin

clrscr;

readln(a);

readln(b);

readln(c);

if (a>b) and (a>c) then

begin

writeln('So lon nhat la ',a:2:2);

readln;

end

else

if (b>a) and (b>c) then

begin

writeln('So lon nhat la ',b:2:2);

readln;

end

else

if (c>a) and (c>b) then

begin

writeln('So lon nhat la ',c:2:2);

readln;

end

end

end.

Duong hanh trang
14 tháng 11 2018 lúc 21:39

Bỏ bớt một cái end nha bạn

Bảo Nam Phạm
Xem chi tiết
Gia Kỳ
Xem chi tiết
Minh Lệ
14 tháng 3 2023 lúc 21:27

Program HOC24;

var i,n,max: integer;

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

begin

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

i:=1; max:=-1;

while i<=n do

begin

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

if a[i]>max then max:=a[i];

i:=i+1;

end;

write('So lon nhat la: ',max);

readln

end.

Nguyễn Thị Ngọc Minh
Xem chi tiết
Minh Lệ
13 tháng 3 2021 lúc 13:03

Program HOC24;

var a,b,c,d,max: integer;

t: longint;

begin

write('Nhap a; b; c; d: '); readln(a,b,c,d);

t:=a+b+c+d;

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

if max<d then max:=d;

write('So lon nhat cua chung la: ',max);

readln

end.

Nguyễn Lê Phước Thịnh
13 tháng 3 2021 lúc 19:55

*Cách khác:

uses crt;

var a,b,c,d,max:integer;

begin

clrscr;

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

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

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

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

writeln('Tong cua 4 so la: ',a+b+c+d);

max:=a;

if max<b then max:=b;

if max<c then max:=c;

if max<d then max:=d;

writeln('Gia tri lon nhat la: ',max);

readln;

end.

Tri Le
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 12 2021 lúc 23:19

b: 

#include <bits/stdc++.h>

using namespace std;

long long a,b,t;

int main()

{

cin>>a>>b;

t=a+b;

cout<<t;

return 0;

}

Trần Long
Xem chi tiết
Lê Thị Phương Dung
Xem chi tiết
Nguyễn Lê Phước Thịnh
7 tháng 5 2021 lúc 21:18

uses crt;

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

i,n:integer;

begin

clrscr;

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

for i:=1 to n do 

  begin

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

end;

for i:=1 to n do 

 if (a[i]>0) and (a[i] mod 5=0) then write(a[i]:4);

readln;

end.