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.

23 tháng 5 2022

C

23 tháng 5 2022

C

23 tháng 5 2022

A

23 tháng 5 2022

B

23 tháng 5 2022

B

23 tháng 5 2022

b

23 tháng 5 2022

D

23 tháng 5 2022

nữ thần nhanh nhẹn mới đăng vài giây mà

23 tháng 5 2022

I Love VN

23 tháng 5 2022

uses crt;

var a:array[1..100]of integer;

i,n,nn,s:integer;

begin

clrscr;

readln(n);

for i:=1 to n do readln(a[i]);

nn:=a[1];

s:=1;

for i:=1 to n do 

begin

if nn>a[i] then nn:=a[i];

s:=s*a[i];

end;

writeln(nn);

writeln(s);

readln;

end.

uses crt;

var n1,n2,n3:integer;

begin

clrscr;

readln(n1,n2,n3);

if n1+n3=n2 then write('co')

else write('khong co');

readln;

end.

22 tháng 5 2022

22 tháng 5 2022

mik chỉ vẽ được hình chữ nhật thôi

bạn thông cảm