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.

Đề bài yêu cầu gì vậy bạn?

5 tháng 5 2021

Đề yêu cầu sắp xếp lại .a) if mod a=0 then.b) while i<50 do

 

 

 

8 tháng 5 2023

         Uses crt;

               Var i, n, t : integer;

               Begin

        clrscr;

        write('Nhap so n = '); readln(n);

        i := l; t := 0;   | sửa: i:=1; t:=0;

        while i <= n do 

begin 

      t := t + i;

      i := i + l;       | Sửa: i:=i+1;

-> Thiếu. Thêm: End;

      write('Tong = ', t);

             Readln;

             end.

18 tháng 3 2021

Giúp mình vs

18 tháng 3 2021

a) tính tổng các số chẵn từ 1 đến 50
b)
  (3): lệnh viết kq của ct trên.
  (4):lệnh in ra màn hình kq của bài toán.
  (5):lệnh kết thúc ct.

2 tháng 5 2021

a,Thứ tự sắp xếp đúng là 9,10,1,12,11,3,4,5,6,7,8,2,13,14

b,Công dụng để tính tổng các số chẵn lớn hơn 50

2 tháng 5 2021

nhỏ nha bạn nhầm:<<

 

a) Tính tổng các số chẵn từ 1 đến 50

b) (3): Cộng các số chẵn trong khoảng từ 1 đến 50

(4): Xuất tổng

(5): Lệnh chờ đợi chương trình xử lý và chạy