cho mảng a có n phân tử, mảng b có m phần tử, tìm ucln tích phân tử của mảng a, và tích phần tử của mảng b.Tìm bcnn của hai tích đó cầm gấp giúp e vs
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.
16 tháng 4 2022
uses crt;
var a:array[1..100]of integer;
i,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
writeln(a[n]);
readln;
end.
NT
1
15 tháng 4 2022
uses crt;
const fo='output.txt';
var f1:text;
st:string;
d,i:integer;
begin
clrscr;
readln(st);
assign(f1,fi); rewrite(f1);
d:=length(st);
for i:=d downto 1 do
write(f1,st[i]);
close(f1);
readln;
end.
3T
0