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.

19 tháng 12 2019

Đáp án đúng : B

4 tháng 12 2018

B

20 tháng 10 2019

Đáp án đúng : A

5 tháng 6 2019

Đáp án đúng : C

*Viết chương trình ghi hai số 5 và 15 vào tệp so.txt:

const f='so.txt';

var f1:text;

begin

assign(f1,f); rewrite(f1);

writeln(f1,'5 15');

close(f1);

end.

*Viết chương trình tính tổng, hiệu, tích, thương của x,y và in kết quả ra màn hình:

uses crt;

const fi='so.txt';

var x,y:integer;

f1:text;

begin

clrscr;

assign(f1,fi); reset(f1);

readln(f1,x,y);

writeln('Tong la: ',x+y);

writeln('Hieu la: ',x-y);

writeln('Tich la: ',x*y);

writeln('Thuong la: ',x/y:4:2);

close(f1);

readln;

end.

6 tháng 2 2021

Dạ vâng em cảm ơn ạ

11 tháng 11 2021

Chọn A

11 tháng 11 2021

Chọn B

13 tháng 12 2019

kết qur là dạng số thập phân

13 tháng 12 2019

Kết quả của x thuộc dạng: Số thập phân

Kết quả của x là: 10,00

uses crt;

var x,y,z:real;

begin

clrscr;

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

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

z:=abs(1-sqr(x))+abs(1-sqr(y));

writeln('Z=',z:4:2);

readln;

end.

9 tháng 10 2020

mik làm cả 2 bằng 1 ct nha

var x,y,z1,z2:real;

begin

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

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

z1:=abs(1-sqr(x)) + abs(1-sqr(y));

z2:=abs(1-exp(x)) + abs(1-exp(y));

writeln(' KQ b1 :' ,z1:0:1);

writeln('KQ b2: ',z2:0:1);

readln;

end.