ai làm giúp code bt pascal Nhập 2 số a, b và 1 dấu bất kì từ bàn phím ( , -, *, /). Hãy in ra kết quả phép tính giữa a, b và dấu được nhập vào.Nếu dấu thì in ra kết quả của tổng a b.Nếu dấu

HV

hà văn hôi

6 tháng 5 2022

ai làm giúp code bt pascal Nhập 2 số a, b và 1 dấu bất kì từ bàn phím (+, -, *, /). Hãy in ra kết quả phép tính giữa a, b và dấu được nhập vào.Nếu dấu + thì in ra kết quả của tổng a+b.Nếu dấu - thì in ra kết quả của hiệu a-b.Nếu dấu * thì in ra kết quả của tích a*b.Nếu dấu / thì in ra kết quả của a/b.INPUTOUTPUT6 5 +6+5=116 5 *6*5=306 0 /MAU SO...

Đọc tiếp

#Tin học lớp 8

0

PT

Phước Thiện Lê Hoàng

22 tháng 4 2021

giúp em với 2 câu thôi ạ :viết chương trình nhập vào xâu bất kì từ bàn phím , ghi xâu sau khi loại bỏ các dấu cách ra tệp D:\ketqua.txtviết chương trình nhập vào từ bàn phím 4 số bất A,B,C. tìm và thông báo kết quả ra màn hình giá trị nhỏ nhất MIN của 4 số đó có sử dụng chương trình...

Đọc tiếp

#Tin học lớp 11

2

NL

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

22 tháng 4 2021

1:

uses crt;

const fi='ketqua.txt';

var f1:text;

st:string;

i,d:integer;

begin

clrscr;

assign(f1,fi); rewrite(f1);

write('Nhap xau:'); readln(st);

d:=length(st);

for i:=1 to d do

if st[i]=#32 then delete(st,i,1);

writeln(f1,st);

close(f1);

end.

Đúng(0)

NL

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

22 tháng 4 2021

2:

uses crt;

var a,b,c,d:integer;

{----------chuong-trinh-con-----------------------}

function min(x,y:integer):integer;

begin

if x<y then min:=x

else min:=y;

end;

{---------------chuong-trinh-chinh--------------------}

begin

clrscr;

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

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

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

write('d='); readln(d);

writeln(min(a,min(b,min(c,d))));

readln;

end.

Đúng(0)

AT

Ánh Thi

8 tháng 3 2023

Câu 1. Nhập số N nguyên dương và dãy N số nguyên từ bàn phím

-in ra dãy số nhập (các số in trên 1 dòng cách nhau bởi dấu cách

-tính tổng các số trong dãy chia hết cho 3, in hết kết quả ra màn hình

GIÚp mik vs ạ!!!!

#Tin học lớp 10

1

PS

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

9 tháng 3 2023

# Nhập số nguyên dương N từ bàn phím

N = int(input("Nhập số nguyên dương N: "))

# Khởi tạo dãy số nguyên

numbers = []

# Vòng lặp để nhập N số nguyên và thêm chúng vào danh sách numbers

for i in range(N):

number = int(input("Nhập số thứ {}:".format(i+1)))

numbers.append(number)

# In ra dãy số đã nhập

print("Dãy số bạn đã nhập là: ", end="")

for number in numbers:

print(number, end=" ")

print()

# Tính tổng các số chia hết cho 3 và in ra màn hình

total = 0

for number in numbers:

if number % 3 == 0:

total += number

print("Tổng các số trong dãy chia hết cho 3 là: ", total)

Đúng(0)

PP

phuongtra pham

12 tháng 11 2021

Bài 2: Hãy viết chương trình trong Pascal thực hiện các công việc sau:a) Nhập 2 số nguyên a và b vào từ bàn phím (a > b và b khác 0)b) In ra phần nguyê của phép chia cho a và b, với độ rộng in ra kết quả được quy định là 3c) In ra phần dư của phép chia cho a và b, với độ rộng in ra kết quả được quy định là 2d) Lưu chương trình với tên có dạng hoten-lop Trong chương trình phải sử dụng các lệnh xóa màn hình và...

Đọc tiếp

#Tin học lớp 8

1

NL

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

13 tháng 11 2021

uses crt;

var a,b:integer;

begin

clrscr;

readln(a,b);

writeln(a div b);

writeln(a mod b);

readln;

end.

Đúng(0)

U

User

8 tháng 11 2021

Viết chương trình nhập từ bàn phím hai số nguyên a và b. Thực hiện tính và in ra màn hình kết quả của phép tính (chỉ lấy 2 chữ số sau phần thập phân). Giúp mình với Pascal nha mn

#Tin học lớp 8

1

NL

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

8 tháng 11 2021

Đề thiếu rồi bạn

Đúng(0)

VN

Vinh Nguyễn

12 tháng 5 2023

vt trương trình pascal nhập vào số a từ bàn phím sau đó in ra màn hình kết quả của phép tính sau a^3 +15

#Tin học lớp 8

1

KV

Kiều Vũ Linh

12 tháng 5 2023

var a,s:real;

begin

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

s:=a*a*a+15;

write('Ket qua la ',s:10:2);

readln

end.

Đúng(1)

VB

Vinh Bùi

27 tháng 4 2022

Viết chương trình nhập mảng A có N phần tử là số nguyên (N được nhập bất kì từ bàn phím). In ra màn hình mảng vừa nhập, mỗi phần tử cách nhau 1 dấu cách trống.

#Tin học lớp 8

1

NL

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

30 tháng 4 2022

#include <bits/stdc++.h>

using namespace std;

long long a[1000],i,n;

int main()

{

cin>>n;

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

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

return 0;

}

Đúng(1)

D

Dương

22 tháng 11 2021

Viết chương trình nhập 3 số nguyên a b c vào từ bàn phím sau đó tính và in ra kết quả

Viết chương trình nhập 3 số nguyên a b c vào từ bàn phím sau đó tính và in ra kết quả M;Nvà P biết :
M := a+b+c
N := ab+bc+ac
P:= abc

#Tin học lớp 8

0

BT

Bùi Trần Nghĩa Hưng

28 tháng 10 2021

c1 Viết chương trình in ra màn hình trung bình cộng của 3 số dương a,b,c(a,b,c được nhập từ bàn phím)c2 Viết chương trình tính chu vi và diện tích hình chữ nhật có chiều dài 2 cạnh a và b(được nhập từ bàn phím in ra kết quả màn hình)Hộ mình với ạ đang cần...

Đọc tiếp

#Tin học lớp 8

2

NL

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

30 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)/3;

return 0;

}

Đúng(0)

DT

Đỗ Thành Nhân

3 tháng 5

nbbnbnbbnn\(\dfrac{^{ }}{ }\)

Đúng(0)

KH

Khánh Hoàng

6 tháng 3 2023

viết chương trình pascal sử dụng câu lệnh lặp while do để tính tổng s=1+1/2^2+1/3^2+...+1/n^2,n là số nguyên nhập từ bàn phím.In kết quả ra màn hình yêu cầu đưa ra 4 dấu cách và 2 chữ số thập phân sau dấu phẩy

#Tin học lớp 8

1

ML

Minh Lệ

7 tháng 3 2023

Program HOC24;

var i,n: integer;

s: real;

begin

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

i:=1;

while i<=n do

begin

s:=s+1/sqr(i);

i:=i+1;

end;

write('S= ',s:8:2);

readln

end.

Đúng(2)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

INPUT	OUTPUT
6 5 +	6+5=11
6 5 *	6*5=30
6 0 /	MAU SO =0

Bảng xếp hạng

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

Yêu cầu VIP