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
Nguyen Hoai Nam
Xem chi tiết
Vy Thea
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 12 2022 lúc 0:14

Input: a,b

Output: max,min của hai số a,b

Trần Phan Luân
Xem chi tiết
Nguyễn Lê Phước Thịnh
3 tháng 1 2022 lúc 22:09

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a*b);

if (a>0) then writeln('a la so nguyen duong')

else writeln('a la so nguyen am');

readln;

end.

Phương Hoài
Xem chi tiết
Quyên Mai
17 tháng 3 2023 lúc 21:19

mình cũng cần ạ

Minh Lệ
17 tháng 3 2023 lúc 23:04

a)

Input: Số nguyên dương N, dãy số a1,a2,a3,...,an

Output: Tổng các số chẵn nhỏ hơn hoặc bằng N

b)

Program HOC24;

var i,n: integer;

t: longint;

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

f1,f2: text;

const fi='SONGUYEN.TXT'

fo='SOCHAN.TXT'

begin

assign(f1,fi);

assign(f2,fo);

reset(f1);

rewrite(f2);

readln(f1,n);

for i:=1 to n do read(f1,a[i]);

for i:=1 to n do if (a[i] mod 2=0) and (a[i]<=n) then

begin

write(f2,a[i],' ');

t:=t+a[i];

end;

writeln(f2);

write(f2,t);

close(f1); close(f2);

end.

phương nguyễn
Xem chi tiết
Nguyễn Lê Phước Thịnh
30 tháng 12 2021 lúc 15:40

Câu 2: A

Câu 3: A

Yến Nhi Nhi
Xem chi tiết
Nguyễn Lê Phước Thịnh
4 tháng 1 2023 lúc 14:54

Bài 1:

Input: Số n

Output: Kiểm tra xem n có chia hết cho 5 ko

Mô tả thuật toán:

Bước 1: Nhập n

Bước 2: Nếu n chia hết cho 5 thì xuất ra có

không thì không

Bước 3: Kết thúc

Viết ct:

uses crt;

var n:integer;

begin

clrscr;

readln(n);

if n mod 5=0 then write('yes')

else write('no');

readln;

end.

Hạnh Hồng
Xem chi tiết
Nguyễn Ngọc Thiện Nhân
5 tháng 3 2023 lúc 8:53

Thư Uyên
Xem chi tiết
Nguyễn Lê Phước Thịnh
26 tháng 3 2021 lúc 20:05

Bài 1: 

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do 

  begin

s:=s+i;

inc(i);

end;

writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

Nguyễn Lê Phước Thịnh
26 tháng 3 2021 lúc 20:07

Bài 2: 

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do 

  begin

s:=s+i;

i:=i+2;

end;

writeln('Tong cac so le trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

NgocTuan
3 tháng 1 2022 lúc 20:13

alo

Lucky Kate
Xem chi tiết
Bao112233
17 tháng 12 2022 lúc 21:22

b) 

#include <iostream>
using namespace std;
int a;
int main(){
    cin>>a;
    if (a%2==0) cout<<a<<" la so chan";
    else cout<<a<< "la so le";
    return 0;
}