1) viết chương trình pascal nhập giá trị cho 2 số nguyên x,y từ bàn phím và in ra màn hình kết quả tính tổng 2 số đó. 2) Tương tự như bài 1 in ra kết quả tính hiệu 3) Tương tự như bài 1 in ra kết quả...

RN

Rain Nguyễn

19 tháng 10 2018

1) viết chương trình pascal nhập giá trị cho 2 số nguyên x,y từ bàn phím và in ra màn hình kết quả tính tổng 2 số đó. 2) Tương tự như bài 1 in ra kết quả tính hiệu 3) Tương tự như bài 1 in ra kết quả tính tích 4) Tương tự như bài 1 in ra kết quả tính thương 5) Viết chương trình pascal tính diện tích hình tam giác với độ dài 1 cạnh a chiều cao tương ứn gh ( a,h là các giá trị nguyên nhâp vào từ bàn...

Đọc tiếp

#Tin học lớp 8

3

RN

Rain Nguyễn

19 tháng 10 2018

mọi người gíu e đi ạ, e đang cần gấp
e camon trc ạ

Đúng(0)

C

cvxcvxvxcvxc

20 tháng 10 2018

bài này dễ bạn hãy suy nghĩ kĩ đi đã

Đúng(0)

ML

Minh Lệ

25 tháng 7 2023

Tạo chương trình nhập từ bàn phím giá trị 2 số a, b; sau đó tính và in ra màn hình tổng và hiệu của 2 số đó.

Ví dụ, sau khi nhập a = 12, b = 23 chương trình đưa ra kết quả ra màn hình như ở Hình 5.

#Tin học lớp 8

1

QT

Quoc Tran Anh Le

Giáo viên

18 tháng 11 2023

Tạo chương trình như sau:

Đúng(0)

YT

Yết Thiên

12 tháng 5 2021

Câu 1 viết chương trình tính giá trị biểu thức với x,y là các số nguyên dc nhập từ bàn phím. In kết quả ra màn hình Caau2 viết chương trình vào 3 số nguyên a,b,c.In ra màn hình số lớn nhất trong 3 số đó

#Tin học lớp 8

3

TG

Trúc Giang

12 tháng 5 2021

Câu 2:

Program nii;

Uses crt;

Var a,b,c,A:integer;

Begin

Write ('nhap a');

Readln (a);

Write ('nhap b');

Readln (b);

Write ('nhap c');

Readln (c);

A:=a;

If A<b then A:=b;

If A<c then A:=c;

Write ('Ket qua',A);

Readln;

End.

Đúng(2)

TG

Trúc Giang

12 tháng 5 2021

Câu 1

Program ntg;

Uses crt;

Var A,x,y:integer;

Begin

Write ('nhap x');

Readln (x);

Write ('nhap y');

Readln ('y');

A:=x+y;

Write ('Ket qua',A);

Readln;

End.

Đúng(1)

NM

Nguyễn Mỹ

5 tháng 4 2021

Bài 1: VCT nhập vào 1 dãy số nguyên từ bàn phím và in các phần tử của dãy số đó ra màn hình Bài 2: VCT nhập vào 1 dãy số từ bàn phím tính tổng dãy số đó và in kết quả ra màn hình Bài 3: VCT nhập vào 1 dãy số từ bàn phím tính tổng các số chẵn của dãy số đó và in kết quả ra màn hình ( làm giúp em lẹ ạ, mai e phải nộp rồi...

Đọc tiếp

#Tin học lớp 8

4

NA

nguyễn an phát

5 tháng 4 2021

Bài 1:

program in_phan_tu;

uses crt;

var n,i:longint;

a:array[1..100] of longint;

begin

clrscr;

write('nhap so n:');readln(n);

for i:=1 to n do

begin

write('nhap phan tu a[',i,']:');readln(a[i]);

end;

for i:=1 to n do

write(a[i]:3);

readln;

end.

Bài 2:

program tong_phan_tu;

uses crt;

var n,i,tong:longint;

a:array[1..100] of longint;

begin

clrscr;

write('nhap so n:');readln(n);

for i:=1 to n do

begin

write('nhap phan tu a[',i,']:');readln(a[i]);

end;

tong:=0;

for i:=1 to n do

tong:=tong+a[i];

writeln('tong cua day la:');

readln;

end.

Bài 3:

program tong_phan_tu_chan;

uses crt;

var n,i,tong:longint;

a:array[1..100] of longint;

begin

clrscr;

write('nhap so n:');readln(n);

for i:=1 to n do

begin

write('nhap phan tu a[',i,']:');readln(a[i]);

end;

tong:=0;

for i:=1 to n do

if a[i] mod 2=0 then tong:=tong+a[i];

writeln('tong cua day la:');

readln;

end.

Đúng(0)

NL

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

5 tháng 4 2021

Câu 1:

uses crt;

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

i,n:integer;

begin

clrscr;

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

for i:=1 to n do

begin

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

end;

for i:=1 to n do

write(a[i]:4);

readln;

end.

Đúng(0)

HP

Hắc Phong

12 tháng 12 2016

Bài tập 1: Viết chứng trình tính tổng 3 số nguyên được nhập từ bàn phím

Bài tập 2: Viết chương trình nhập vào một số và in ra màn hình kết quả số chẵn hay số lẻ

Bài tập 3: Mô tả thuật toán tính tổng của 100 số tự nhiên đầu tiên

#Tin học lớp 8

3

DN

duong nguyenvan

21 tháng 11 2017

program bai1;

uses crt;

var a,b,c,s: real;

begin

clrscr;

write('nhap so thu nhat ='); readln(a);

write('nhap so thu hai ='); readln(b);

write('nhap so thu ba ='); readln(c);

s:=a+b+c;

writeln('tong ba so a,b,c =',s:4:2);

readln;

end.

Đúng(0)

DN

duong nguyenvan

21 tháng 11 2017

program bai1;

uses crt;

var n: integer;

begin

clrscr;

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

if n mod 2 = 0 then

writeln('la so chan ') else

writeln('la so le ');

readln;

end.

Đúng(0)

TU

Thư Uyên

26 tháng 3 2021

Bài 1: Viết chương trình pascal thực hiện các yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên n b) In ra màn hình kết quả tổng các số nguyên từ 1 đến n (sử dụng câu lệnh lặp while...do) Bài 2: Viết chương trình pascal thực hiện câc yêu cầu sau: a) Nhập từ bàn phím 1 số nguyên dương n b) In ra màn hình kết quả tổng các số lẻ từ 1 đến n (sử dụng câu lệnh lặp while...do giúp mình với mình đang...

Đọc tiếp

#Tin học lớp 8

3

NL

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

26 tháng 3 2021

Bài 1:

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do

begin

s:=s+i;

inc(i);

end;

writeln('Tong cac so trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

Đúng(1)

NL

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

26 tháng 3 2021

Bài 2:

uses crt;

var n,i,s:integer;

begin

clrscr;

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

s:=0;

i:=1;

while i<=n do

begin

s:=s+i;

i:=i+2;

end;

writeln('Tong cac so le trong khoang tu 1 den ',n,' la: ',s);

readln;

end.

Đúng(1)

HH

Hải Hà

6 tháng 4 2023

Bài 1: VCT đếm các phần tử là số nguyên âm chẵn của dãy n số nguyên từ bàn phím. Sau đó in kết quả ra màn hình Bài 2:VCT tính tổng các phần tử chia hết cho 5 của dãy n số nguyên nhập từ bàn phím. Sau đó in dãy số và kết quả r màn hình Bài 3: VCT tính tích các phần tử là số chẵn của dãy n nhập từ bàn phím và in kết quả r màn hình (Giúp mik vs ạ)

#Tin học lớp 8

3

ML

Minh Lệ

6 tháng 4 2023

Bài 1:

Program HOC24;

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

i,n,d: integer;

begin

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

for i:=1 to n do if (a[i]<0) and (a[i] mod 2=0) then d:=d+1;

write('Co ',d,' so nguyen am chan trong day so');

readln

end.

Đúng(1)

ML

Minh Lệ

6 tháng 4 2023

Bài 2:

Program HOC24;

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

i,n: integer;

t: longint;

begin

write('Nhap so phan tu: '); readln(n);

for i:=1 to n do

begin

write('Nhap so thu ',i,': '); readln(a[i]);

end;

t:=0;

for i:=1 to n do if a[i] mod 5=0 then t:=t+a[i];

write(Tong la: ',t);

readln

end.

Đúng(1)

N

ngocanh

1 tháng 12 2021

câu 1 Viết - chạy - sửa lỗi ( nếu có ) chương trình in ra trên màn hình dòng chữ " lớp 8A chào bạn ! " câu 2 Viết chương trình ghi và in ra màn hình kết quả tổng 2 số tự nhận a, b nhập vào từ bàn phím câu 3 Viết chương trình tính s và chu vi hình chữ nhật biết 2 cạnh nhập từ bàn phím . Lưu tệp với tên HCN ....

Đọc tiếp

#Tin học lớp 8

3

N

ngocanh

1 tháng 12 2021

giúp em với

Đúng(0)

TM

Trần Minh Tâm

1 tháng 12 2021

Caua1:

program caumot;

begin

writeln('lop 8A chao ban!');

end.

Câu 2:

program cauhai;

int a,b,c :real;

begin

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

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

c= a+b;

write('Tong hai so a b la:',c);

end.

Đúng(0)

VT

Võ Tấn Trường Phạm

6 tháng 3 2023

Bài 6: Viết chương trình nhập vào từ bàn phím số nguyên dương N, sử dụng câu lệnh điều kiện và câu lệnh lặp for to do để tính tổng các giá trị chia hết cho 2 và chia hết cho 3 trong phạm vi từ 1 dến N, sau đó in kết quả ra màn hình....

Đọc tiếp

#Tin học lớp 8

1

NL

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

9 tháng 3 2023

#include <bits/stdc++.h>

using namespace std;

int main()

{

int n,t=0;

cin>>n;

for (int i=1; i<=n; i++)

if (i%6==0) t+=i;

cout<<t;

return 0;

}

Đúng(0)

PH

phạm hải nam

14 tháng 3 2022

viết chương trình nhập vào 1 mảng gồm n phần từ bàn phím . tính tổng các phần tử trong mảng .in kết quả ra màn hình.

-khai báo biến biến mảng .

-nhập n số phần tử mảng ,

-nhập mảng ,

-in mảng.

-tính tổng ,

-in kết quả ra màn hình

#Tin học lớp 8

1

NL

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

14 tháng 3 2022

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n,t;

int main()

{

cin>>n;

for (i=1; i<=n; i++) cin>>a[i];

for (i=1; i<=n; i++) cout<<a[i]<<" ";

cout<<endl;

t=0;

for (i=1; i<=n; i++) t+=a[i];

cout<<t;

return 0;

}

Đú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