Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài

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

 

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

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.

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;

}

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

SATOSI NAKAMOTO
17 tháng 1 2019 lúc 15:58

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

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ùi Anh Tuấn
11 tháng 4 2021 lúc 20:38

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.

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.

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é

Khách vãng lai đã xóa
Chill Lofi
Xem chi tiết