giúp em viết chương trình để ra giống kq với ạ, trước 0h em nộp rồi ạ :((
Những câu hỏi liên quan
Viết Chương Trình Pascal chiều dài a và chiều rộng của hình chữ nhật.Tính chu vi và diện tích của hình chữ nhật và in kết quả ra màn hình.(a,b là số nguyên dương).
Mọi người giúp em với ạ sắp nộp rồi ạ :((
#include <bits/stdc++.h>
using namespace std;
long long a,b;
int main()
{
cin>>a>>b;
cout<<(a+b)*2<<endl;
cout<<a*b;
return 0;
}
Đúng 0
Bình luận (0)
Viết chương trình nhập số nguyên dương n. Dãy số nguyên A1,A2,....An,.... Sau đó đếm số phần tử dương trong dãy số đó.
Mọi người giúp em với ạ, mai em phải nộp bài rồi:((
#include <bits/stdc++.h>
using namespace std;
long long x,n,i,dem;
int main()
{
cin>>n;
dem=0;
for (i=1; i<=n; i++)
{
cin>>x;
if (x>0) dem++;
}
cout<<dem;
return 0;
}
Đúng 0
Bình luận (1)
Viết chương trình nhập số nguyên dương n. Dãy số nguyên A1,A2,....An,.... Sau đó đếm số phần tử dương trong dãy số đó. Mọi người giúp em với ạ, tí nữa em phải nộp bài rồi:((
viết chương trình in ra hàng ngang từ 20 đến 15 với ạ, mọi người giúp em với em cảm ơn ạ
#include <bits/stdc++.h>
using namespace std;
long long i;
int main()
{
for (i=20; i>=15; i--) cout<<i<<" ";
return 0;
}
Đúng 1
Bình luận (0)
Viết chương trình nhập điểm trung bình môn tin học cuối hk1 của các bạn hc sinh trong lớp em và in ra số điểm cao nhất?
GIÚP EM VỚI Ạ ! MAI EM THI RỒI
Nếu chưa học câu lệnh này thì rep lại cho mình để mình dùng mấy câu lệnh đã học từ b8 trở về trước nhá! Good luck for you :D
Đúng 0
Bình luận (1)
uses crt;
var a:array[1..50]of real;
max:real;
i,n:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('Nhap diem cua ban thu ',i,'='); readln(a[i]);
end;
max:=a[1];
for i:=1 to n do
if max<a[i] then max:=a[i];
writeln(max);
readln;
end.
Đúng 0
Bình luận (1)
viết đoạn văn ngắn (khoảng 1-1,5 trang giấy a4) nêu cảm nhận về một trong những truyện ngắn (ngoài chương trình) của Nam Cao mà em đã đọc
Làm giúp mình với, mng đừng tra mạng giúp mình ạ (8h mình phải nộp rồi)
Mọi người giúp em với ạ mai em kiểm tra cuối kì em cảm ơn trước ạ: Viết chương trình pascal tính tổng của n số nguyên với n được nhập từ bàn phím mong mọi người giải giùm
uses crt;
var a:array[1..100]of integer;
i,n,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
t:=0;
for i:=1 to n do
t:=t+a[i];
writeln(t);
readln;
end.
Đúng 0
Bình luận (0)
Giúp em với mọi người tối này em phải nộp rồi
Em cảm ơn trước ạ 
viết chương trình tính chu vi, diên tích hình vuông với cạnh a được nhập vào từ bàn phím.❤✿
mn giúp em với ạ T4 em thi rồi!!!
clrscr;
write('nhap canh a: ');readln(a);
P:=a*4;
S:=a*a;
writeln('Chu vi hinh vuong canh a la: ',P);
writeln('Dien tich hinh vuong canh a la: ',S);
Đúng 0
Bình luận (2)
uses crt;
var a,cv,dt:real;
begin
clrscr;
repeat
write('Nhap a='); readln(a);
until a>0;
cv:=a*4;
dt:=sqr(a);
writeln('Chu vi la: ',cv:4:2);
writeln('Dien tich la: ',dt:4:2);
readln;
end.
Đúng 0
Bình luận (0)