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.

Câu 3: 

uses crt;

var a,b:int64;

begin

clrscr;

readln(a,b);

writeln(a+b);

readln;

end.

16 tháng 4 2023

Program HOC24;

var p: longint;

i,x: integer;

Begin

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

p:=1;

for i:=3 to x do if i mod 2=1 then p:=p*i;

write('P = ',p);

readln

end.

uses crt;

var k,x,y:integer;

begin

clrscr;

readln(k);

x:=k mod 5;

y:=k div 5;

writeln(k,'/5=',x,' du ',y);

readln;

end.

22 tháng 2 2022

Cảm ơn bạn nhiều nha 😊

4 tháng 1 2022

1B

2D

23 tháng 10 2022

sai rồi

 

6 tháng 8 2023

Tham khảo:

Thuật toán giải phương trình ax + b = 0

- Bằng liệt kê tuần tự

Bước 1: Nhập hai số thực a, b

Bước 2. Nếu a = 0

Bước 2.1. Nếu b ≠0 thì thông báo phương trình vô định, rồi kết thúc;

Bước 2.2. Nếu b = 0 thì gán x

Bước 3:  x

Bước 4. Đưa ra nghiệm x, rồi kết thúc.

6 tháng 8 2023

- Sơ đồ khối:

loading...

Đề xuất các test tiêu chuẩn

Để xét tất cả các trường hợp có thể xảy ra, ta sử dụng ba bộ test như sau:

i) a = 0, b = 1 (kiểm tra trường hợp phương trình vô định);

ii) a = 0,b = 0 (kiểm tra trường hợp nghiệm x=0);

iii) a = 3, b = 6 (kiểm tra trường hợp nghiêm , y = -b/a).

11 tháng 12 2021

uses crt;

var x:integer;

begin

clrscr;

readln(x);

writeln(x*x+x+1);

readln;

end.

17 tháng 11 2019

Đáp án B

15 tháng 11 2019

Đáp án B