Câu 1: viết chương trình tính (a b)/(a-b) nhập từ bàn phímcâu 2 viết chương trình tính a*a b*b c*c nhạp từ bàn phímCâu 3 viết chương tính x*y/z với x,y,z nhập từ bàn phím Câu 4: Viết chương trình nh...

NH

Nguyễn Hoàng Tân Bảo

14 tháng 10 2021

Câu 1: viết chương trình tính (a+b)/(a-b) nhập từ bàn phímcâu 2 viết chương trình tính a*a+ b*b+ c*c nhạp từ bàn phímCâu 3 viết chương tính x*y/z với x,y,z nhập từ bàn phím Câu 4: Viết chương trình nhập vào 3 môn văn toán anh tính trung bình cộngCâu 5: viết chương trình nhập vào 4 số a,b,c,d sau đó tính trung bình cộng của 4 số đó Câu 6: Viết chương trình tính diện tích hình tam giácCâu 7: tính diện tích chu vi hình tròn (chỉ với...

Đọc tiếp

#Tin học lớp 8

4

RH

Rin Huỳnh

14 tháng 10 2021

Câu 1:

Uses crt;

Var a,b:real;

Begin

Clrscr;

Readln(a);

Readln(b);

Writeln((a+b)/(a-b));

Readln

End.

Đúng(0)

RH

Rin Huỳnh

14 tháng 10 2021

Câu 2:

Uses crt;

Var a,b,c:real;

Begin

Clrscr;

Readln(a);

Readln(b);

Readln(c);

Writeln(a*a+b*b+c*c);

Readln

End.

Đúng(0)

NH

Nguyễn Hoàng Tân Bảo

14 tháng 10 2021

Câu 2: Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím

Câu 3: Viết Chương trình nhập vào ba số nguyên a, b, c. tính a+b-c.

Câu 4: Viết Chương trình nhập vào 3 số x, y, z. Tính (x+y)*z (giúp em với ạ em cảm ơn mọi người)

#Tin học lớp 8

1

ND

Nguyễn Đăng Khải Hoàn

14 tháng 10 2021

C1:

khai báo:

program hieu_a_va_b ("tự đặt tên cái này ko cần thiết)

uses crt;

var a, b : integer

phần thân:

begin

writeln ("nhap so a"); read(a);

writeln ("nhap so b"); read(b);

writeln ("hieu cua hai so la: a - b=" , a - b);

end.

C2:

khai báo:

program tinh_ba_so

uses crt;

var a, b, c : integer

phần thân:

begin

writeln ("nhap so a"); read(a);

writeln ("nhap so b"); read(b);

writeln ("nhap so c"); read(c);

writeln ("ket qua cua phep tinh a+b-c la" , a+b-c);

end.

C3:

khai báo:

program tinh_ba_so

uses crt;

var x, y, z : integer

phần thân:

begin

writeln ("nhap so x"); read(x);

writeln ("nhap so y"); read(y);

writeln ("nhap so z"); read(z);

writeln ("ket qua cua phep tinh (x+y)*z la") , (x+y)*z);

end.

nhớ chạy thử chương trình nha. xem có lỗi ko.

(nhớ tick cho mk nha)

Đúng(0)

NH

Nguyễn Hoàng Tân Bảo

13 tháng 10 2021

Câu 2: Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím

Câu 3: Viết Chương trình nhập vào ba số nguyên a, b, c. tính a+b-c.

Câu 4: Viết Chương trình nhập vào 3 số x, y, z. Tính (x+y)*z (giúp em với ạ em cảm ơn mọi người)

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

13 tháng 10 2021

Câu 2:

#include <bits/stdc++.h>

using namespace std;

long long a,b;

int main()

{

cin>>a>>b;

cout<<a-b;

return 0;

}

Đúng(0)

KK

Kina Kinosu

21 tháng 10 2021

Câu 1: viết chương trình tính a*b*c với a,b,c nhập từ bàn phím *câu 2 viết chương trình tính x*x+y*y với x,y Nhậptừ bàn phím *Câu 3 viết chương tính (a div b)+ (a mod b) với a,b nhập từ bàn phím *Câu 4: Viết chương trình nhập vào 5 số a,b,c,d,e tính trung bình công của 4 số...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

21 tháng 10 2021

Câu 1:

#include <bits/stdc++.h>

using namespace std;

double a,b,c;

int main()

{

cin>>a>>b>>c;

cout<<fixed<<setprecision(2)<<a*b*c;

return 0;

}

Đúng(0)

MU

Mỹ Uyên

24 tháng 12 2020

câu 1 viết chương trình in ra màn hình diện tích và chu vi hình vuông s : =a*a; p:=4*a;câu 2 viết chương trình tính tổng , tích và hiệu của hai số được nhập từ bàn phímcâu 3 viết chương trình kiểm tra 3 số a,b,c có là ba cạnh của một tam giác hay không với a,b,c là 3 số nhập từ bàn...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

24 tháng 12 2020

Câu 1:

uses crt;

var a,s,p:real;

begin

clrscr;

repeat

write('Nhap do dai canh hinh vuong:'); readln(a);

until a>0;

p:=4*a;

s:=sqr(a);

writeln('Chu vi hinh vuong la: ',p:4:2);

writeln('Dien tich hinh vuong la: ',s);

readln;

end.

Câu 2:

uses crt;

var a,b,t,s,h:real;

begin

clrscr;

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

t:=a+b;

h:=a-b;

s:=a*b;

writeln('Tong la: ',t:4:2);

writeln('Hieu la: ',h:4:2);

writeln('Tich la: ',s:4:2);

readln;

end.

Câu 3:

uses crt;

var a,b,c:real;

begin

clrscr;

repeat

write('Nhap a='); readln(a);

write('Nhap b='); readln(b);

write('Nhap c='); readln(c);

until (a>0) and (b>0) and (c>0);

if (a+b>c) and (a+c>b) and (b+c>a) then writeln('Day la ba canh trong mot tam giac')

else writeln('Day khong la ba canh trong mot tam giac');

readln;

end.

Đúng(0)

C

ʍ๏ɲ ȼhąɲ

5 tháng 10 2021

C1.Viết chương trình tính tổng hai số A và B với A, B là 2 số được nhập từ bàn phím C2. Viết Chương trình nhập vào ba số nguyên a, b, c. tính a+b-c. C3.Viết Chương trình tính hiệu a - b với a,b là hai số nguyên nhập từ bàn phím. C4.Chương trình nhập vào 3 số x, y, z. Tính (x+y)*z Giúp em với ạ em cảm ơn nhiều lắm...

Đọc tiếp

#Tin học lớp 8

2

NL

Nguyễn Lê Phước Thịnh

5 tháng 10 2021

Câu 1:

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

write(a+b);

readln;

end.

Câu 2:

uses crt;

var a,b,c:integer;

begin

clrscr;

readln(a,b,c);

writeln(a+b-c);

readln;

end.

Đúng(1)

NL

Nguyễn Lê Phước Thịnh

5 tháng 10 2021

Câu 3:

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a-b);

readln;

end.

Câu 4:

uses crt;

var x,y,z:integer;

begin

clrscr;

readln(x,y,z);

writeln((x+y)*z);

readln;

end.

Đúng(1)

DT

Đỗ Trọng TÍn

28 tháng 4 2023

mn giúp em với ạ sắp thi rồi :|||
câu 1: viết chương trình tính N! (với số N là số tự nhiên được nhập từ bàn phím
câu 2: viết chương trình tính tổng sau
s=1+1/2+1/3.....+1/n

#Tin học lớp 8

2

ML

Minh Lệ

28 tháng 4 2023

Câu 1:

Program HOC24;

var i,n: integer;

t: longint;

write('Nhap N: '); readln(n);

t:=1;

for i:=1 to n do t:=t*i;

write(n,'! = ',t);

readln

end.

Đúng(2)

ML

Minh Lệ

28 tháng 4 2023

Câu 2:

Program HOC24;

var i,n: integer;

S: real;

begin

write('Nhap n: '); readln(n);

S:=0;

for i:=1 to n do S:=S+1/i;

write('S = ',s);

readln

end.

Đúng(2)

MP

Ma Phan Đức

3 tháng 2 2021

Câu 1: Sử dụng vòng lặp for ... do, viết chương trình tính tổng của 10 số tự nhiên đầu tiên ?Câu 2: Viết chương trình tìm xem có bao nhiêu số dương trong N số nhập vào từ bàn phímCâu 3: Viết chương trình in ra màn hình bảng nhân của một số từ 1 đến 9, và dừng màn hình để có thể quan...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

3 tháng 2 2021

Câu 1:

uses crt;

var s,i:integer;

begin

clrscr;

s:=0;

for i:=1 to 10 do

s:=s+i;

writeln('Tong cua 10 so tu nhien dau tien la: ',s);

readln;

end.

Câu 2:

uses crt;

var a:array[1..100]of integer;

i,n,dem:integer;

begin

clrscr;

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

for i:=1 to n do

begin

write('A[',i,']='); readln(a[i]);

end;

dem:=0;

for i:=1 to n do

if a[i]>0 then inc(dem);

writeln('So luong phan tu duong la: ',dem);

readln;

end.

Câu 3:

uses crt;

var i,j:integer;

begin

clrscr;

for i:=1 to 9 do

begin

writeln('Bang nhan ',i,' la: ');

for j:=1 to 10 do

writeln(i,'*',j,'=',i*j);

delay(200);

end;

readln;

end.

Đúng(1)

NL

NGUYỄN LÊ XUÂN THỊNH

19 tháng 2 2023

1. Viết chương trình tính tích N=1*2*3*...*n (với n được nhập từ bàn phím) 2. Viết chương trình tính tổng A=1/1*3+1/2*4+1/3*5+...+1/n*(n+2) 3. Viết chương trình tính tổng số lẻ có trong dãy từ 0->n (n được nhập từ bàn phím) 4. Viết chương trình in ra màn hình các số chẵn có trong dãy từ 0->n (n được nhập từ bàn phím) và đếm có bao nhiêu số. 5. Viết chương trình in ra màn hình các số lẻ có trong dãy số từ 0->n (n được...

Đọc tiếp

#Tin học lớp 8

1

NL

Nguyễn Lê Phước Thịnh

20 tháng 2 2023

Câu 6:

uses crt;

var n,i:integer;

begin

clrscr;

readln(n);

for i:=1 to n do

if n mod i=0 then write(i:4);

readln;

end.

5:

uses crt;

var n,i,dem:integer;

begin

clrscr;

readln(n);

dem:=0;

for i:=0 to n do

if i mod 2=1 then

begin

write(i:4);

dem:=dem+1;

end;

writeln;

writeln(dem);

readln;

end.

Đúng(2)

NY

Như Ý

1 tháng 5 2023

Câu 1 : viết chương trình tính tổng các số chẵn với n được nhập từ bàn phím ?

Câu 2 : viết chương trình tính tổng các số lẻ với n được nhập từ bàn phím ?

#Tin học lớp 8

1

PS

Phía sau một cô gái

1 tháng 5 2023

Câu 1:

program Tinhtong:

var

n, i, sum: integer;

begin

write('Nhap n: ');

readln(n);

sum := 0;

for i := 2 to n do

begin

if i mod 2 = 0 then

begin

sum := sum + i;

end;

writeln('Tong cac so chan tu 2 toi ', n, ' la ', sum);

readln;

end.

Câu 2:

program Tinhtong:

var

n, i, sum: integer;

begin

write('Nhap n: ');

readln(n);

sum := 0;

for i := 1 to n do

begin

if i mod 2 = 1 then

begin

sum := sum + i;

end;

writeln('Tong cac so le tu 1 toi ', n, ' la ', sum);

readln;

end.

Đúng(2)

NY

Như Ý

2 tháng 5 2023

Sao tới 3 end vậy

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP