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.

4 tháng 12 2018

kết qur là 5

16 tháng 10 2021

uses crt;

begin

clrscr;

writeln((5-2*3)/2:4:2);

writeln((15*4-8)*3);

writeln((15 div 2) mod 3);

writeln((245 div 10) div 3) mod 2);

readln;

end.

16 tháng 10 2021

cảm ơn nhaa:))

uses crt;

var i,s:integer;

begin

clrscr;

s:=0;

for i:=1 to 50 do

s:=s+i;

writeln('Tong cua 50 so tu nhien la: ',s);

readln;

end.

21 tháng 10 2021

a: 15 mod 2=1

b: 27 div 5=5

c: 17 mod 3=2

d: 21 div 2=10

e: 10 mod 4=2

f: 23 div 5=4

16 tháng 12 2018

uses crt;

var

a,b: integer;

begin

clrscr;

write('Nhap so thu nhat: ');readln(a);

write('Nhap so thu hai: ');readln(b);

writeln('Tong ',a,' va ',b,' la: ',a+b);

readln

end.

21 tháng 12 2018

Câu 1:

Var

cv,s,a:integer;

begin

write('nhap vao canh hinh vuong:');readln(a);

s:=a*a;

cv:=a*4;

Writeln('chu vi hinh vuong la:',cv);

WRiteln('dien tich hinh vuong la:',s);

readln

end.

1 tháng 5 2019

uses crt;

var m,n: integer;

begin

clrscr;

writeln('Nhap n = '); read(n);

m:=0;

for i:=1 to n do

m:=m+i*i*i;

m:=sqrt(m);

writeln('m = ',m);

readln

end.

1 tháng 5 2019

const
nhap='input.inp';
xuat='output.out';
var s:int64;
i,n:longint;
begin
assign(input,nhap); reset(input);
assign(output,xuat); rewrite(output);
readln(n);
for i:=1 to n do
s:=s+i;
write(s);
end.
close(input);close(ouput);

28 tháng 4 2017

cần gấp ạ

28 tháng 4 2017

a/ 7 vòng lặp

b/ biến bằng 1,2,3,4,5,6,7