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.
Bản thân mình cũng học chuyên Tin nhưng lại không mạnh về Pascal, thôi thì xem những bạn khác trổ tài vậy :3
anh không mạnh về Pascal thì anh làm c++ cũng được mà
#include <bits/stdc++.h>
using namespace std;
double a,b,cv,dt;
int main()
{
cin>>a>>b;
cv=(a+b)*2;
dt=a*b;
cout<<fixed<<setprecision(2)<<cv<<endl;
cout<<fixed<<setprecision(2)<<dt;
return 0;
}
Input: N và dãy số a1, a2, ..., aN
Output: Các số nguyên tố có trong dãy đã cho
Thuật toán:
Bước 1: Nhập số nguyên dương N
Bước 2: Nhập dãy N số nguyên dương
Bước 3: Với mỗi số ai trong dãy, thực hiện:
- Nếu ai<2 thì không phải số nguyên tố
- Ngược lại:
+ Đặt biến dem = 0
+ Duyệt các số từ 1 đến ai
+ Nếu ai chia hết cho số đang xét thì tăng dem lên 1
- Sau khi duyệt xong: Nếu dem = 2 thì ai là số nguyên tố
Bước 4: In ra các số nguyên tố tìm được
Bước 5: Kết thúc thuật toán
Khi nhắc đến Tin học, em hiểu đó là một ngành khoa học trẻ nhưng cực kỳ quan trọng, liên quan đến máy tính và xử lý thông tin, mang đến nhiều lợi ích to lớn, giải quyết vấn đề thực tế, đòi hỏi sự sáng tạo, logic và khả năng học hỏi không ngừng để đáp ứng tốc độ phát triển nhanh chóng trong thời đại số. Ngành này không chỉ về việc dùng máy tính, mà còn là về việc hiểu cách máy tính hoạt động, lập trình, phát triển phần mềm, trí tuệ nhân tạo, và nhiều lĩnh vực khác, mở ra vô số cơ hội và thách thức.
uses crt;
var a:array[1..100] of integer;
i,n,d,tong :integer;
begin
clrscr;
d:=0;
tong:=0;
readln(n);
for i:=1 to n do
readln(a[i]);
end;
for i:=1 to n do
if (a[i]>0) then begin
d:=d+1;
if d=1 then begin writeln('trong day co so nguyen duong '); write(' vi tri cua cac so duong ',i); end
else
begin
tong:=tong+a[i];
write(' ',i);
end;
end
else if ((i=n)and(d=0)) then write(' khong co so duong');
writeln;
writeln(' tong so luong so nguyen duong trong day so: ',d);
writeln(' ton cac so nguyen duong: ',tong);
readln;
end.
Tin học có ý nghĩa cực kỳ quan trọng trong ngành truyền thông, giúp tự động hóa quy trình, tăng tốc độ xử lý và truyền tải thông tin, mở rộng phạm vi tiếp cận (qua internet, mạng xã hội, ứng dụng), đa dạng hóa hình thức nội dung (video, âm thanh, tương tác), và tạo ra môi trường cộng tác hiệu quả, chuyển đổi ngành truyền thông từ truyền thống sang hiện đại, kết nối toàn cầu.