Viết chương trình cho phép tính trung bình cộng 4 số với điều kiện chỉ được sử dụng 2 biến
K
Khách
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.
NP
2
2 tháng 4 2022
Tham Khảo
Chương trình là tập dữ liệu gồm một chuỗi mã lệnh phần mềm dùng để điều khiển hoạt động của máy tính hoặc các dạng máy móc khác. Các phần tử của bộ nhớ máy tính vật lý bao gồm một địa chỉ và một byte/từ (word: đơn vị lưu trữ) của bộ nhớ dữ liệu.2 tháng 4 2022
Phần mềm hệ thống : Window, MAC, LINUX,..
Phần mềm ứng dụng:Paint, Words,Chrome
Phần mềm (Software) có thể hiểu là mộttập hợp các tập tincó mối liên hệ chặt chẽ với nhau, đảm bảothực hiện một số nhiệm vụ, chức năng nào đó trên thiết bị điện tử. Các tập tin này có thể bao gồm:các file mã nguồnviết bằng một hoặc nhiều ngôn ngữ lập trình,các file dữ liệu(thư viện),các file hướng dẫn. tham khảo
2 tháng 4 2022
uses crt;
var a:array[1..100]of real;
i,n:integer;
ln:real;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
ln:=0;
for i:=1 to n do if ln<a[i] then ln:=a[i];
writeln(ln:4:2);
readln;
end.
2 tháng 4 2022
uses crt;
var i,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
if i mod 2=1 then write(i:4);
for i:=1 to n do
if i mod 2=0 then write(i:4);
readln;
end.
2 tháng 4 2022
uses crt;
var a:array[1..1000]of integer;
i,n,t,j:integer;
begin
clrscr;
readln(n);
for i:=1 to n do readln(a[i]);
for i:=1 to n do
begin
t:=0;
for j:=1 to a[i] div 2 do
if a[i] mod j=0 then t:=t+j;
if t=a[i] then write(a[i]:4);
end;
readln;
end.
ML
1 tháng 4 2022
Program HOC24;
var Toan,Ly,Tin,TBMToan,TBMLy,TBMTin: real;
i,n: byte;
begin
write('Nhap so ban hoc sinh trong lop: '); readln(n);
for i:=1 to n do
begin
write('Nhap diem Toan; Ly; Tin cua ban thu ',i,': ');
readln(Toan[i],Ly[i],Tin[i]);
end;
TBMToan:=0; TBMLy:=0; TBMTin:=0;
For i:=1 to n do
begin
TBMToan:=TBMToan+Toan[i];
TBMLy:=TBMLy+Ly[i];
TBMTin:=TBMTin+Tin[i];
end;
writeln('Diem trung binh mon Toan la: ',TBMToan:5:1);
writeln('Diem trung binh mon Ly la: ',TBMLy:5:1);
writeln('Diem trung binh mon Tin la: ',TBMTin:5:1);
For i:=1 to n do
writeln('Diem trung binh 3 mon cua ban thu ',i,' la: ',TBMToan+TBMLy+TBMTin:5:1);
Readln
end.
tham khảo https://hayhochoi.vn/cach-tinh-theo-phuong-trinh-hoa-hoc-va-bai-tap-van-dung-hoa-8-bai-22.html