Mô tả thuật toán của các bài toán sau:
a/ tìm giá trị tuyệt đối của một số a cho trước
b/ tìm số lớn nhất trong ba số a, b và c nhập từ bàn phím
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.
Những câu hỏi liên quan
10 tháng 5 2021
Câu 1:
uses crt;
var n,i,kt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
if n<2 then writeln(n,' khong la so nguyen to')
else begin
kt:=0;
for i:=2 to n-1 do
if n mod i=0 then kt:=1;
if kt=0 then writeln(n,' la so nguyen to')
else writeln(n,' khong la so nguyen to');
end;
readln;
end.
10 tháng 5 2021
Câu 2:
uses crt;
var a:array[1..100]of integer;
i,n,max,min:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
max:=a[1];
min:=a[1];
for i:=1 to n do
begin
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln('So lon nhat la: ',max);
writeln('So nho nhat la: ',min);
readln;
end.
11 tháng 6 2016
Theo bài, a khác b
Nếu muốn các biểu thức nhân, cộng lớn nhất thì các số để nhân,cộng cũng phải lớn nhất
2 số lớn nhất có 1 chữ số là 9 và 8 (a khác b)
Ta có: 9 + 8 = 17 ; 9 x 8 = 72
Vậy giá trị lớn nhất của a + b là 17, của a x b là 72
CM
15 tháng 8 2019
a) Đ
b) S
Vì tổng của hai số nguyên bằng 0 thì cả hai số nguyên đó đều bằng 0 hoặc hai số đó là hai số đối nhau. Ví dụ: (-3) + 3 = 0+ 0 = 0
c) Đ
d) S
Vì khẳng định sẽ bị sai khi các số nguyên đó không cùng dấu.
program bai_5;
uses crt;
var a,b,c :real;
BEGIN
write('nhap vao so a'); Readln(a);
write('nhap vao so b'); Readln(b);
write('nhap vao so c'); Readln(c);
if a<0 then a:=-a;
max:=a;
if max <b then max:=b;
if max<c then max:=c;
write('gia tri tuyet doi cua a la:',a);
write('so lon nhat trong ba so a,b,c la:',max);
Readln
END.
Thanks
cái ĐCM trả lời thì hẳn hoi coi đánh cái j nữa ko hiểu