So sánh điểm của bốn bạn a,b,c,d . tìm ra ai có số điểm cao nhất ngày ,ai phải nộp cần gấp help !

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.

Mua vip

RK

Rick Ko

11 tháng 12 2019

So sánh điểm của bốn bạn a,b,c,d . tìm ra ai có số điểm cao nhất

ngày ,ai phải nộp cần gấp help !

#Hỏi cộng đồng OLM #Tin học lớp 8

1

BA

Bùi Anh Tuấn

12 tháng 12 2019

Hỏi đáp Tin học

Các câu hỏi dưới đây có thể giống với câu hỏi trên

PT

phùng thị thúy vân

31 tháng 3 2020

Viết chương trình thực hiện các công việc sau:

a) Nhập vào điểm số của 3 bạn học sinh

b) in ra màn hình kết quả so sánh điểm của 3 bạn

Mn giúp mik nha. Mik đang cần gấp....... cảm ơn nhìu

#Hỏi cộng đồng OLM #Tin học lớp 8

3

MQ

minh quang

31 tháng 3 2020

Program Sosanhdiem;

uses crt;

var a,b,c: byte;

begin

clrscr;

writeln('Nhap lan luot so diem cua 3 ban'); readln(a,b,c);

if a>b >c then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', a, ' , ' , b , ' , ' ,c ) else

if a>c >b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', a, ' , ' , c , ' , ' ,b ) else

if b>a >c then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', b, ' , ' , a , ' , ' ,c ) else

if b>c >a then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', b, ' , ' , c , ' , ' ,a ) else

if c>a >b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', c, ' , ' , a , ' , ' ,b ) else

if c>b >a then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', c, ' , ' , b , ' , ' ,ba) else

if c>a and a=b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', c, ' , ' , a , ' , ' ,b ) else

if c<a and a=b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', b, ' , ' , a , ' , ' ,c ) else

if b>a and a=c then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', b, ' , ' , a , ' , ' ,c ) else

if b<a and a=c then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', c, ' , ' , a , ' , ' ,b ) else

if a>c and c=b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', a, ' , ' , c, ' , ' ,b ) else

if a<c and c=b then write(' Diem cua 3 ban xep theo thu tu tu lon de be la ', c, ' , ' , b , ' , ' ,a ) else

if a = b =c then write('Diem cua 3 ban bang nhau');

Readln;

end.

Chúc bạn học tốt

NL

Nguyễn Lê Phước Thịnh

31 tháng 3 2020

uses crt;
var a:array[1..3]of real;
tam:real;
i,j:integer;
begin
clrscr;
for i:=1 to 3 do
begin
repeat
write('so diem cua ban thu ',i,' la: '); readln(a[i]);
if (a[i]<0) or (a[i]>10) then writeln('vui long nhap lai');
until (a[i]>=0) and (a[i]<=10);
end;
for i:=1 to 2 do
for j:=i+1 to 3 do
if a[i]>a[j] then
begin
tam:=a[i];
a[i]:=a[j];
a[j]:=tam;
end;
writeln('so diem cua 3 ban xep theo thu tu tu nho den lon la: ');
for i:=1 to 3 do
write(a[i]:4:2,' ');
readln;
end.

BD

Bui Duyen

18 tháng 2 2019

Xin giúp đỡ :">

Câu hỏi :Viết chương trình nhập điểm trung bình môn tin học của các bạn trong lớp .

Sau đó in ra màn hình số điểm cao nhất ,số điểm thấp nhất và điểm TB của cả lớp.

Xin cảm trước đến người trả lới

#Hỏi cộng đồng OLM #Tin học lớp 8

1

NT

Nguyễn Trung Hiếu

3 tháng 5 2019

uses crt;
var i,n:longint;
a:array[1..100] of real;
s1,s,max,min:real;
begin
clrscr;
write('Nhap n: '); readln(n);
for i:=1 to n do
begin
write('Diem trung binh mon tin hoc cua ban thu ',i,' la: ');readln(a[i]);
end;
min:=a[1];max:=a[1];
for i:=2 to n do begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i]; end;
for i:=1 to n do
s:=s+a[i];
s1:=s/n;
writeln('So diem cao nhat la: ',max);
writeln('So diem thap nhat la: ',min);
write('Diem TB cua ca lop la: ',s1:0:1);
readln
end.

TN

Thị Ngọc Phan

23 tháng 12 2016

Hãy viết chương trình nhập ba số dương a, b và c từ bàn phím, kiểm tra và in kết quả ra màn hình kiểm tra ba số đó có thể là độ dài ba cạnh của một tam giác hay không?

Ai biết giúp với !!! Cần gấp gấp gấp lắm

#Hỏi cộng đồng OLM #Tin học lớp 8

2

B

Bacteria

23 tháng 12 2016

Program ba_canh_cua_tam_giac;

uses crt;

var a,b,c: real;

BEGIN

Write('nhap do dai canh a'); Readln(a);

Write('nhap do dai canh b'); Readln(b);

Write('nhap do dai canh c'); Readln(c);

If (a<(b+c)) and (b<(c+a)) and (c<(b+a)) then write('do la do dai cua mot tam giac')

else write('do khong la do dai cua mot tam giac');

Readln;

END.

Thanks

TT

Trịnh Thị Như Quỳnh

23 tháng 12 2016

bạn ơi viết chương trình bằng chữ hay là ở trong pascal z bạn

TQ

Trần Quốc Huy

18 tháng 4 2017

Nhập các phần tử của dãy số chính là điểm trung bình của 10 bạn trong lớp in ra màn hình bạn có điểm trung bình thấp nhất

#Hỏi cộng đồng OLM #Tin học lớp 8

2

GH

Giao Huỳnh

19 tháng 4 2017

uses crt;

var i,min:integer;

dtb:array[1..10] of real;

begin

clrscr;

writeln('nhap dtb cua 10 ban trong lop:');

for i:=1 to 10 do

begin

write('dtb[',i,']=');readln(dtb[i]);

end;

min:=1;

for i:=2 to 10 do

if dtb[i]<dtb[min] then min:=i;

write('ban co diem trung binh thap nhat la ban thu:',min,' dtb la:', dtb[min]:2:1);

readln;

end.

V

VIP

25 tháng 4 2018

vậy nhỡ như không có ai có điểm tb dưới 1 thì sao

P

Pikachu

27 tháng 4 2018

Viết chương trình nhập vào điểm của n bạn học sinh trong lớp in ra màn hình các điểm vừa nhập, in ra mang hình điểm của bạn cao nhất

#Hỏi cộng đồng OLM #Tin học lớp 8

1

LK

Lê Khánh Tùng

9 tháng 5 2018

Bài làm mình để ở đây: https://pastebin.com/EASPa7M0

P

Pikachu

27 tháng 4 2018

Viết chương trình nhập vào điểm của n bạn học sinh trong lớp in ra màn hình các điểm vừa nhập, in ra mang hình điểm của bạn cao nhất

#Hỏi cộng đồng OLM #Tin học lớp 8

0

YN

Ý Nhi

8 tháng 6 2020

Viết ctrình để nhập điểm toán , điểm văn của các bạn trong lớp và tính điểm trung bình của các bạn trong lớp với điểm tbình ( điểm toán + điểm văn )/2 in ra màn hình điểm tbình cao nhất của lớp .

#Hỏi cộng đồng OLM #Tin học lớp 8

1

ML

Minh Lệ

9 tháng 6 2020

Program HOC24;

Var a,b: array[1..32000] of real;

i,n: integer;

max,d1,d: real;

begin

write('Nhap so hoc sinh : '); readln(n);

for i:=1 to n do

begin

write('Nhap diem toan ban thu ',i,' : '); readln(a[i]);

write('Nhap diem van ban thu ',i,' : '); readln(b[i]);

end;

max:=0;

for i:=1 to n do

begin

d:=a[i]+b[i];

d1:=d/2;

if d1>max then max:=d1;

end;

write('Diem trung binh cao nhat la : ',max);

readln

end.

QN

Quyên Nguyễn

18 tháng 4 2017

1 Nhập các phần tử của dãy số từ bàn phím in ra màn hình tổng các số lẻ

2Nhập các phần tử của dãy số chính là điểm trung bình của 10 bạn trong lớp in ra màn hình bạn có điểm trung bình thấp nhất

Sử dụng biến mảng để giải 2 bài trên

#Hỏi cộng đồng OLM #Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

8 tháng 2 2022

Bài 1:

#include <bits/stdc++.h>

using namespace std;

long long n,i,t,x;

int main()

{

cin>>n;

t=0;

for (i=1; i<=n; i++)

{

cin>>x;

if (x%2!=0) t=t+x;

}

cout<<t;

return 0;

}

TB

Tô Bảo Châu

6 tháng 5 2019

viết chương trình sử dụng biến mảng nhạp dãy số gồm 10 phần tử và in các phần tử đó ra màn hình?

viết chương trình nhập vào 1 dãy số nguyên, tìm ra số nhỏ nhất của dãy?

nêu cách khai bào biến mảng trong pascal và các thành phần của nó?

mai thi rui cần rất gấp ai trả lời nhanh tặng 10 gp

#Hỏi cộng đồng OLM #Tin học lớp 8

3

QT

Quỳnh Thư

6 tháng 5 2019

Program hoc24hoc24;

Uses crt;

Var i: Integer;

A: array [1..10] of Integer;

BEGIN

Clrscr;

For i:=1 to 10 do

Begin write ('A[',i,']='); readln (A[i]); end;

For i:= 1 to 10 do write (A[i]:3);

Readln

End.

QT

Quỳnh Thư

6 tháng 5 2019

Bài 9. Làm việc với dãy số