Mô tả thuật toán: Nhập chiều cao của hai bạn Long và Trang. Hãy cho biết kết quả so sánh chiều cao của hai bạn, chẳng hạn "Long cao hơn Trang"," Trang cao hơn Long" hay "hai bạn bằng nhau".
Viết chương trình nhập vào chiều cao của 2 bạn Long và Trang. So sánh chiều cao rồi in ra màn hình bạn nào cao hơn.
program Chieu_cao;
uses crt;
var Long, Trang : integer;
begin
writeln('Nhap chieu cao cua Long (Duoi dang cm)');
readln(Long);
writeln('Nhap chieu cao cua Trang (Duoi dang cm)');
readln(Trang);
if Long > Trang then writeln('Long cao hon Trang')
else writeln('Trang cao hon Long);
end.
#AeMZn
program Chieu_cao;
uses crt;
var Long, Trang : integer;
begin
writeln('Nhap chieu cao cua Long (Duoi dang cm)');
readln(Long);
writeln('Nhap chieu cao cua Trang (Duoi dang cm)');
readln(Trang);
Viết chương trình so sánh chiều cao của 2 bạn Long và Trang và in ra màn hình kết quả Long cao hơn Trang, Long thấp hơn Trang, Long cao bằng Trang.
LƯU Ý: SỬ DỤNG CÂU LỆNH LẶP
Var Long, Trang: real;
Begin
Write(‘nhap chieu cao Long =’); readln(Long);
Write(‘nhap chieu cao Trang =’); readln(Trang);
If Long>Trang then writeln(‘Long cao hon Trang’)
else If Long=Trang then write('Long cao bang Trang)
else write('Long thap hon Trang');
readln
end.
viết chương trình nhập vào chiều cao hai bạn A và B.Kiểm tra bạn A cao hơn bạn B hay bạn B cao hơn bạn A hay cả hai bạn bằng nhau?
-Nhanh nha mọi người làm ơn :P và cảm ơn
#include <bits/stdc++.h>
using namespace std;
double a,b;
int main()
{
cin>>a>>b;
if (a>b) cout<<"a cao hon b";
else if (a<b) cout<<"b cao hon a";
else cout<<"a bang b";
return 0;
}
Các đoạn chương trình khác nhau chỗ nào?
1/ If Long > Trang then writeln('Long cao hon');
If Long < Trang then writeln('Trang cao hon') else writeln('Ca hai bang nhau');'
và
2/ If Long > Trang then writeln('Long cao hon') else If Long < Trang then writeln('Trang cao hon') else writeln('Ca hai bang nhau);
Giúp mình vớiiiii
ở cái 1 nó kiểm trả Long>Trang lớn hơn rồi thì nó vẫn tiếp tục kt lệnh Long<Trang thì sẽ ra 2 kết quả
còn cái 2 ở cái nó kt Long>Trang rồi thì nó in luôn Long cao hơn
hãy viết chương trình và mô tả thuật toán tìm chiều cao cao nhất của các bạn trong lớp
B1 gán max=a[1];
B2 xét nếu max<a[i] thì gán max=a[i];
B3 inkeets quả ra màn hình
uses crt;
var cao:array[1..100]of real;
max:real;
i,n:integer;
begin
clrscr;
write('Nhap so ban:'); readln(n);
for i:=1 to n do
begin
write('Nhap chieu cao 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.
viết chương trình nhập vào điểm môn toán của hai bạn mạnh và thanh hãy so sánh điểm của hai bạn và thông báo kết quả ra màn hình (điểm nhập vào nhỏ hơn hoặc bằng 10)
program SoSanhDiem;
var
DiemManh, DiemThanh: real;
begin
write('Nhap diem cua ban Manh: ');
readln(DiemManh);
write('Nhap diem cua ban Thanh: ');
readln(DiemThanh);
if DiemManh > DiemThanh then
writeln('Ban Manh dat diem cao hon ban Thanh.')
else if DiemManh < DiemThanh then
writeln('Ban Thanh dat diem cao hon ban Manh.')
else
writeln('Hai ban dat diem bang nhau.');
readln;
end.
program sosanh;
uses crt;
var a,b,c : real;
begin
readln(a,b);
c:= a-b;
if c>0 then writeln(' a lon hon b');
if c<0 then writeln('a nho hon b');
if c=0 then writeln('a bang b');
readln;
end.
Dốt tin nên chỉ làm dc vậy, đúng thì 5 sao nhé