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.
Hãy viết chương trình nhập vài 10 số nguyên từ bàn phím và in ra màn hình số lớn nhất . Cho biết số lớn nhất đó có phải là số chẵn không? Giúp mik với ạ ! Mik đang cần gấp ! Cảm ơn trước !
#include <bits/stdc++.h>
using namespace std;
long long a[10],n=10,i,ln;
int main()
{
for (i=1; i<=n; i++) cin>>a[i];
ln=a[1];
for (i=1; i<=n; i++) ln=max(ln,a[i]);
cout<<ln<<endl;
if (ln%2==0) cout<<"Phai";
else cout<<"Khong phai";
return 0;
}
program bt;
uses crt;
var i, max : integer;
a : array[1..10] of integer;
begin
clrscr;
for i:=1 to 10 do begin
write('Nhap so thu ',i,': '); readln(a[i]);
end;
max := 0;
for i:=1 to 10 do if a[i] > max then max := a[i];
if (max mod 2 = 0) then write(max,' la so lon nhat va la so chan')
else write(max,' la so lon nhat va la so le');
readln
end.
Mọi người giúp mik vs nhé, mik cần gấp, sắp thi rồi. Mik cảm ơn trc ạ: C1: nhập vào 1 mảng gồm n phần tử, tính giá trị trung bình của dãy số đó. C2: Viết chương trình nhập dãy n số và in ra tổng các số chẵn, tổng các số lẻ trong dãy cần nhập. C3: viết chương trình nhập dãy n số và cho biết số nhỏ nhất trong các số vừa nhập là số thư mấy?
Mình nghĩ mình sẽ không đưa code, mà chỉ đưa ý tưởng thôi nhé.
1. Khai báo n, mảng a và s = 0. Với mỗi phần tử a, ta cộng nó vào s. Cuối ta in ra s/n.
2. Cũng khai báo n, mảng a và 2 biến s1 (lưu tổng lẻ) và s2 (lưu tổng chẵn). Với mỗi a, ta kiểm tra số đó có phải là số chẵn hay lẻ (if n mod 2 = 0) và cộng vào s1 (nếu là chẵn) hoặc s2 (nếu là lẻ) và in ra.
3. Khai báo n, mảng a và minn để chứa số nhỏ nhất. Với mỗi a, tìm minn bằng cách so sánh a với minn và gán lại minn nếu nó lớn hơn a. Sau đó cho chạy thêm một vòng nữa để kiểm tra xem số nào là số minn, và in chỉ số của nó ra.
Nếu có gì thắc mắc, hỏi kỹ mình, mình sẽ giúp đỡ nhé.
Chúc bạn học tốt 
.
Câu 1:
uses crt;
var n,i,t:integer;
a:array[1..100]of 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/n:4:2);
readln;
end.
Câu 1:
Program Tin_hoc;
Uses crt;
Var i,n,tong:integer;
tb:real;
a:array[1..1000] of integer;
Begin
clrscr;
Write('Nhap n: ');readln(n);
tong:=0;
Writeln('Nhap ',n,' phan tu cua day:');
for i:= 1 to n do
begin
write('a[',i,'] = ');
readln(a[i]);
tong:=tong+a[i];
end;
tb:=tong/n;
Writeln('Gia tri trung binh cua day la: ',tb:0:4);
readln;
end.
Em hãy lập chương trình Scratch tính tiền cước taxi theo km như trong Bảng 5 với quãng đường S (km) được nhập từ bàn phím.
Gợi ý:
- Nếu S ≤ 0,5 thì số tiền cần phải trả là 8000 (đồng).
- Nếu 0,5 < S ≤ 30 thì số tiền cần phải trả là 8000 + (S - 0,5) × 14500 (đồng).
- Nếu S > 30 thì số tiền phải trả là 8000 + 29,5 × 14500 + (S – 30) × 11000 (đồng).
pascal Tính tiền đi taxi từ số km đã đi được nhập vào, biết:- 1 km đầu giá 5000đ.- Từ km thứ 2 – thứ 5: 4500 đ/km- Từ km thứ 6 trở đi: 3500 đ/km, đi hơn 120 km sẽ được giảm 10% trên tổng sốtiền theo quy định. (làm tròn 2 chữ số thập phân)
uses crt;
var i,sokm:integer;
tong:real;
begin
write('nhap so km: ');readln(sokm);
for i:=1 to n do
begin
if i=1 then tong:=tong+5000;
else if tong>=2 and tong<=5 then tong:=tong+4500;
else tong:=tong+3500;
end;
if sokm>120 then tong=(tong/10)*9;
writeln('so tien la ',tong,' dong');
readln;
end.
Var km:longint;
st:real;
Begin
write('Nhap vao so km da di ');readln(km);
if km = 1 then write('So tien la 5000');
if (km > 1) and (km<= 5) then write('So tien la ',5000+(km-1)*4500);
if (km >= 6) and (km <= 20) then write('So tien la ',5000 + 4*4500+(km-5)*3500)
if km>120 then
begin
st:=5000+4*4500+(km-5)*3500-0.1*(5000+4*4500+(km-5)*3500);
write(st:15:2);
end;
readln;
end.
BÀI 17: Một hàng taxi quy định giá cước như sau: 1km đầu tiên giá 11.000đ . Từ km thứ hai trở đi giá 10.000đ/km.
a) Người thuê xe taxi của hãng đó đi x km (x > 1) . Hãy viết đa thức tính số tiền mà người đó phải trả?
b) Tìm bậc ,hệ số cao nhất,hệ số tự do của đa thức đó ?
a: y=11000+(x-1)*10000=10000x+1000
b: Bậc là 1
Hệ số cao nhất là 10000
Hệ số tự do là 1000
Một hành khách thuê taxi đi quãng đường x km và phải trả số tiền là y nghìn đồng. Giá thuê xe taxi được tính bởi hàm số y=6x đối với 10km đầu tiên và y=2,5x+3,5y với cái km tiếp theo. Hãy tính số tiền phải trả nếu người đó đi một quãng đường 8km và 18km
Ai biết trả lời giúp em với. Mai em nộp bài rồi ạ
một hãng taxi có giá cước tính như sau: 1km đầu tiên giá 12 nghìn đồng. Từ km thứ hai trở đi giá 10 nghìn đồng/km
a) Người thuê taxi của hãng đó đi x km ( x > 1). Hãy viết đa thức tính số tiền mà người đó phải trả
b) Tìm bậc,hệ số cao nhất, hệ số tự do của đa thức đó
Giúp mình với ạ
a, Giá tiền km đầu là 12 000 đồng
Giá tiền từ km thứ hai trở đi là 10 000 đồng
Số km người đó phải trả với giá 10 000 đồng là: \(x\) - 1
Số tiền mà người đó phải trả khi đi \(x\) ki-lô-mét là:
12 000 + 10 000 \(\times\) ( \(x\) - 1) = 10000\(x\) + 2000
Đa thức tính số tiền người đó đi trong \(x\) ki - lô- mét là:
F(\(x\)) = 10000\(x\) + 2000
b, Bậc của đa thức là 1
Hệ số cao nhất là 10 000
Hệ số tự do là: 2000
có cần phải số giây nữa k bạn vd: 6 phút 30s
