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
Tiến Trang
Xem chi tiết
Nguyễn Lê Phước Thịnh
2 tháng 11 2021 lúc 23:31

uses crt;

var x,y:int64;

begin

clrscr;

readln(x,y);

writeln('z=',x div y);

writeln('t=',x mod y);

readln;

end.

Pham Trong Bach
Xem chi tiết
Cao Minh Tâm
24 tháng 1 2017 lúc 16:45

Đáp án đúng : B

 

hoc hoi
Xem chi tiết
Yết Thiên
Xem chi tiết
Trúc Giang
12 tháng 5 2021 lúc 9:55

Câu 2:

Program nii;

Uses crt;

Var a,b,c,A:integer;

Begin

Write ('nhap a');

Readln (a);

Write ('nhap b');

Readln (b);

Write ('nhap c');

Readln (c);

A:=a;

If A<b then A:=b;

If A<c then A:=c;

Write ('Ket qua',A);

Readln;

End.

Trúc Giang
12 tháng 5 2021 lúc 9:51

Câu 1

Program ntg;

Uses crt;

Var A,x,y:integer;

Begin

Write ('nhap x');

Readln (x);

Write ('nhap y');

Readln ('y');

A:=x+y;

Write ('Ket qua',A);

Readln;

End.

 

Nguyễn Lê Phước Thịnh
12 tháng 5 2021 lúc 18:43

Câu 2: 

uses crt;

var a,b,c,max:integer;

begin

clrscr;

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

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

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

max:=a;

if max<b then max:=b;

if max<c then max:=c;

writeln('So lon nhat trong 3 so la: ',max);

readln;

end.

Cương Lỗ Bá
Xem chi tiết
Mimi
Xem chi tiết
Minh Lệ
18 tháng 4 2023 lúc 23:17

Program HOC24; 

var x,y,z,a,b: real;

begin

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

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

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

a:=x*x+y*y+z*z;

writeln('Ket qua cau a la: ',a:6:2);

b:=sqrt(x+y+z);

write('Ket qua cau b la: ',b:6:2);

readln

end.

Lê Kim Ngân
Xem chi tiết
Hoàng Ninh
8 tháng 10 2018 lúc 12:46

a) \(A=\left|x+y-z\right|\)

\(\Rightarrow A=\left|-6+3-2\right|\)

\(\Rightarrow A=\left|-5\right|\)

\(\Rightarrow A=5\)

b) \(B=\left|-6-3+2\right|\)

\(\Rightarrow B=\left|-7\right|\)

\(\Rightarrow B=7\)

c) \(C=\left|-6-3-2\right|\)

\(\Rightarrow C=\left|-11\right|\)

\(\Rightarrow C=11\)

Hạ Thanh
Xem chi tiết
Nguyễn Lê Phước Thịnh
11 tháng 11 2021 lúc 23:26

Câu 2: 

uses crt;

var x,y:int64;

begin

clrscr;

readln(x,y);

writeln(x+y);

readln;

end.

Nguyễn Hà Phương
Xem chi tiết