viết chương trình tính U=√2gh với g=9,8. với h nhập từ bàn phím. khai báo hằng
Những câu hỏi liên quan
viết chương trình tính tổng n số tự nhiên : S =1+2+3+...+ n, với n là số tự nhiên được nhập từ bàn phím ( có sử dụng khai báo biến mảng )
program SumOfNumbers;
uses crt;
var
n, i, sum: integer;
numbers: array[1..100] of integer;
begin
clrscr;
write('Enter n: ');
readln(n);
// Tạo mảng các số tự nhiên từ 1 đến n
for i := 1 to n do
numbers[i] := i;
// Tính tổng các số tự nhiên từ 1 đến n
sum := 0;
for i := 1 to n do
sum := sum + numbers[i];
writeln('The sum of the first ', n, ' natural numbers is: ', sum);
readln;
end.
Đúng 2
Bình luận (0)
Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tích 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a, b, tich : integer;
B. Var a , b, tich : real;
C. Var a, b, tich : char;
D. Var a, b, tich : string;
Nhập 2 số nguyên a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a , b, tong : real;
B. Var a, b, tong : integer;
C. Var a, b, tong : char;
D. Var a, b, tong : string;
Nhập 2 số thực a, b từ bàn phím. Viết chương trình tính tổng 2 số a, b. Để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào?
A. Var a, b, tong : char;
B. Var a, b, tong : integer;
C. Var a , b, tong : real;
D. Var a, b, tong : string;
nhập 2 số nguyên a b từ bàn phím viết chương trình tính tổng S của 2 số a b để khai báo cho bài toán trên ta sử dụng câu lệnh khai báo nào
tùy bạn thôi có nhiều cách khai báo mà
Đúng 0
Bình luận (0)
1 tháng 11 2021 lúc 17:02
Câu 2: Viết câu lệnh khai báo biến x có kiểu dữ liệu số thực và hằng pk có giá trị 20.
Câu 3: Viết chương trình Pascal tính tổng S của hai số nguyên a và b được nhập từ bàn phím
Kíu!! Mai thi mất r!!!
Câu 3:
uses crt;
var a,b:int64;
begin
clrscr;
readln(a,b);
writeln(a+b);
readln;
end.
Đúng 0
Bình luận (0)
Viết chương trình để tính và thông báo lên màn hình T=n!+m!.Với m,n là hai số nguyên nhỏ hơn 50 được nhập từ bàn phím .
Yêu cầu:Chương trình có khai báo và gọi hàm tính giai (k!)
Giúp em giải theo dạng pascal với ạ..em cảm ơnnnn..
uses crt;
var t,n,m:longint;
//chuongtrinhcon
function gt(k:longint):longint;
var i,a:integer;
begin
a:=1;
for i:=1 to k do
a:=a*i;
gt:=a;
end;
//chuongtrinhchinh
begin
clrscr;
readln(n,m);
writeln(gt(n)+gt(m);
readln;
end.
Đúng 1
Bình luận (0)
Câu 1: viết chương trình tính a*b*c với a,b,c nhập từ bàn phím *câu 2 viết chương trình tính x*x+y*y với x,y Nhậptừ bàn phím *Câu 3 viết chương tính (a div b)+ (a mod b) với a,b nhập từ bàn phím *Câu 4: Viết chương trình nhập vào 5 số a,b,c,d,e tính trung bình công của 4 số đó
Đọc tiếp
Câu 1: viết chương trình tính a*b*c với a,b,c nhập từ bàn phím *
câu 2 viết chương trình tính x*x+y*y với x,y Nhậptừ bàn phím *
Câu 3 viết chương tính (a div b)+ (a mod b) với a,b nhập từ bàn phím *
Câu 4: Viết chương trình nhập vào 5 số a,b,c,d,e tính trung bình công của 4 số đó
Câu 1:
#include <bits/stdc++.h>
using namespace std;
double a,b,c;
int main()
{
cin>>a>>b>>c;
cout<<fixed<<setprecision(2)<<a*b*c;
return 0;
}
Đúng 0
Bình luận (0)
Câu 1 : viết chương trình tính tổng các số chẵn với n được nhập từ bàn phím ?
Câu 2 : viết chương trình tính tổng các số lẻ với n được nhập từ bàn phím ?
Câu 1:
program Tinhtong:
var
n, i, sum: integer;
begin
write('Nhap n: ');
readln(n);
sum := 0;
for i := 2 to n do
begin
if i mod 2 = 0 then
begin
sum := sum + i;
end;
end;
writeln('Tong cac so chan tu 2 toi ', n, ' la ', sum);
readln;
end.
Câu 2:
program Tinhtong:
var
n, i, sum: integer;
begin
write('Nhap n: ');
readln(n);
sum := 0;
for i := 1 to n do
begin
if i mod 2 = 1 then
begin
sum := sum + i;
end;
end;
writeln('Tong cac so le tu 1 toi ', n, ' la ', sum);
readln;
end.
Đúng 2
Bình luận (1)