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.
uses crt;
var a,b,i,j:integer;
st:string;
begin
clrscr;
repeat
write('Ban muon ve khong:'); readln(st);
if st='Yes' then
begin
write('Nhap chieu dai:'); readln(a);
write('Nhap chieu rong:'); readln(b);
for i:=1 to a do
begin
for j:=1 to b do
write('*');
writeln;
end;
end
else break;
until st='No';
readln;
end.
const fi='kt.txt';
fo='kq.out';
var f1,f2:text;
s:string;
i,dem,d:integer;
begin
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,s);
d:=length(s);
dem:=0;
for i:=1 to d do
if s[i]='e' then inc(dem);
writeln(f2,dem);
close(f1);
close(f2);
end.
#include <bits/stdc++.h>
using namespace std;
long long a[50],n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
{
cin>>a[i];
t=t+a[i];
}
for (i=1; i<=n; i++) cout<<a[i]<<" ";
cout<<endl;
cout<<t;
return 0;
}
Các công cụ hỗ trợ làm phim:
1. Adobe Spark
Adobe Spark là phần mềm chỉnh sửa video online tốt nhất hiện nay, giúp bạn dễ dàng tạo ra những đoạn video cực kỳ ấn tượng không thua kém gì những video chuyên nghiệp với những thao tác cực kỳ đơn giản.
Ưu điểm:
- Tính năng làm video định dạng vuông cho Instagram.
- Dễ dàng kết hợp văn bản, hình ảnh, biểu tượng và chủ đề trong video.
- Tạo video hoạt hình nhanh chóng chỉ trong vài phút.
- Hỗ trợ lưu trữ video lên Dropbox, Google Drive,...
Nhược điểm:
- Video sau khi chỉnh sửa sẽ có gắn logo Adobe Spark mờ ở bên dưới.
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=d downto 1 do
write(st[i]);
readln;
end.
uses crt;
var a:array[1..100]of integer;
i,n,t,t1,dem:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
t:=0;
for i:=1 to n do
if a[i]>0 then t:=t+a[i];
t1:=0;
for i:=1 to n do
if (a[i]>0) and (a[i] mod 2<>0) then t1:=t1+a[i];
dem:=0;
for i:=1 to n do
if a[i]>0 then dem:=dem+1;
writeln(t);
writeln(t1);
writeln(dem1);
readln;
end.
