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.

12 tháng 2 2020

uses crt;

var s:integer;

begin

s:=7+8+9+10+11+12+13;

write(s);

readln;

end.

12 tháng 2 2020

Vậy cũng được nè:

uses crt;

var s:integer;

i:byte;

begin

for i:=7 to 13 do

s:=s+i;

write(s);

readln;

end.

21 tháng 3 2021

lệnh for...to...do:

a)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 9 do s:=s+i;

  write(s);

readln;

end.

b)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 14 do

begin

if i mod 2=0 then

s:=s+i;

end;

  write(s);

readln;

end.

c)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  for i:=1 to 15 do

begin

if i mod 2=1 then

s:=s+i;

end;

  write(s);

readln;

end.

lệnh while...do

a)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=9 do

begin

  s:=s+i;

i:=i+1;

end;

  write(s);

readln;

end.

b)program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=14 do

begin

if i mod 2=0 then

  s:=s+i

else i:=i+1;

end;

  write(s);

readln;

end.

c)

program tinh_tong;

uses crt;

var i,s:byte;

begin

  clrscr;

  s:=0;

  i:=1;

while i<=15 do

begin

if i mod 2=1 then

  s:=s+i

else i:=i+1;

end;

  write(s);

readln;

end.

29 tháng 12 2015

A=(2+3+...+13)-(1+2+...+12)=2+3+...+13-1-2-...-12=(13-1)+(2-2)+(3-3)+...+(12-12)=12

12 tháng 1 2022

12 nha cậu .

18 tháng 2 2020

a) Dấu hiệu là điểm bài thi học kì của 100 học sinh lớp 7 của một trường Trung học Cơ Sở Hòa Bình. Số các dấu hiệu là 100
b) Bảng tần số
 

Giá trị (x) 1 2 4 5 6 7 8 910111213141516171819 
Tần số (n) 2 1 2 4 6 8 9101311 8 8 4 6 3 2 3 1N=100

Nhận xét: Giá trị lớn nhất là 19, giá trị nhỏ nhất là 1; tần số lớn nhất là 13, tần số nhỏ nhất là 1.

3 tháng 1 2018

sai đề