Những câu hỏi liên quan
thái việt thành
Xem chi tiết
Ngô Vân Minh Châu
Xem chi tiết
Tô Mì
16 tháng 12 2021 lúc 12:32

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

 

Bình luận (0)
Phú Nguyễn
16 tháng 12 2021 lúc 13:40

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);

Bình luận (0)
Alice
Xem chi tiết
Trương Quang Dũng
19 tháng 12 2018 lúc 20:15

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.

Bình luận (0)
Sửu Phạm
Xem chi tiết
Nguyễn Lê Phước Thịnh
9 tháng 1 2022 lúc 20:40

#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;

}

Bình luận (1)
Phác Chí Mẫn
Xem chi tiết
Tú Nguyễn
17 tháng 1 2019 lúc 18:08

ở 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

Bình luận (0)
SATOSI NAKAMOTO
17 tháng 1 2019 lúc 15:58

môn tin học hay tiếng anh thế

Bình luận (1)
nguyễn thị như ý
Xem chi tiết
Bùi Anh Tuấn
11 tháng 4 2021 lúc 20:35

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

Bình luận (0)
Bùi Anh Tuấn
11 tháng 4 2021 lúc 20:38

Bình luận (0)
Nguyễn Lê Phước Thịnh
12 tháng 4 2021 lúc 13:00

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.

Bình luận (0)
hocgioi123
Xem chi tiết
Phía sau một cô gái
10 tháng 5 2023 lúc 19:28

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.

Bình luận (0)
Chill Lofi
Xem chi tiết
HuanVo
5 tháng 8 2021 lúc 13:42

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é

Bình luận (0)
 Khách vãng lai đã xóa
Chill Lofi
Xem chi tiết