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.

15 tháng 12 2020

15 tháng 12 2020

Không có họ tên và số báo danh ạ ?

Đề thiếu điều kiện rồi bạn

19 tháng 1 2022

Thêm mật khẩu là gì nữa em ơi!

22 tháng 10 2020

uses crt;

var van,toan,anh,tin,dtc:real;

begin

clrscr;

write('Nhap diem Van:'); readln(van);

write('Nhap diem Toan:'); readln(toan);

write('Nhap diem Anh:'); readln(anh);

write('Nhap diem Tin:'); readln(tin);

dtc:=van+toan+anh+tin*2;

writeln('Ket qua thi mon Van la: ',van:4:2);

writeln('Ket qua thi mon Toan la: ',toan:4:2);

writeln('Ket qua thi mon Anh la: ',anh:4:2);

writeln('Ket qua thi mon Tin la: ',tin:4:2);

if dtc>=35 then writeln('Dau')

else writeln('Hong');

readln;

end.

22 tháng 10 2020

dtc là gì vậy?

10 tháng 5 2023

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.

10 tháng 12 2020

A) read(cannang);

B) write(x+y+z);

C) write('chu ban thi tot');

2 tháng 9 2021

a) read(canang)

b) write(x + y + z)

c) write("chuc cac ban thi tot")

10 tháng 4 2023

program DiemTB;

var

      diemToan, diemVan, diemTB: real;

begin

      write('Nhap diem mon Toan: ');

      readln(diemToan);

      write('Nhap diem mon Van: ');

      readln(diemVan);

      diemTB := (diemToan + diemVan) / 2;

      writeln('Diem trung binh: ', diemTB:0:2);

      if diemTB >= 5 then

            writeln('Chuc mung! Ban da dau ky thi.')

      else

            writeln('Rat tiec! Ban da truot ky thi.');

      readln;

end.

10 tháng 5 2023

Program HOC24;

var a,b: real;

begin

write('Nhap diem cua Manh: '); readln(a);

write('Nhap diem cua Thanh: '); readln(b);

if a>b then write('Diem cua ban Manh cao hon ban Thanh');

if a<b then write('Diem cua ban Thanh cao hon ban Manh');

if a=b then write('Diem cua ban Manh bang ban Thanh');

readln

end.