Viết chương trình nhập vào bốn số nguyên a,b,c,d
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.

25 tháng 8 2023

Mình sử dụng ngôn ngữ c++:

#include <bits/stdc++.h>

using namespace std;
long long a[5];
int main()
{
    for(int i=1;i<=4;i++){
        cin>>a[i];
    }
    sort(a+1,a+5);
    cout<<a[1];
    return 0;
}

Câu 1: Xác định bài toán là: A. Viết thuật toán của bài toán B. Tìm INPUT và OUTPUT C. Viết chương trình D. Tất cả đều sai Câu 2: Quá trình giải toán trên máy tính gồm các bước: A. Xác định bài toán B. Mô tả thuật toán và viết chương trình C. Xác định bài toán và viết chương trìn D. Câu a và b đúng. Câu 3: Các kiểu dữ liệu nào sau đây không...
Đọc tiếp

  • Câu 1:

    Xác định bài toán là:

    • A. Viết thuật toán của bài toán
    • B. Tìm INPUT và OUTPUT
    • C. Viết chương trình
    • D. Tất cả đều sai
  • Câu 2:

    Quá trình giải toán trên máy tính gồm các bước:

    • A. Xác định bài toán
    • B. Mô tả thuật toán và viết chương trình
    • C. Xác định bài toán và viết chương trìn
    • D. Câu a và b đúng.
  • Câu 3:

    Các kiểu dữ liệu nào sau đây không phải là kiểu dữ liệu trong ngôn ngữ lập trình Pascal:

    • A. Chuỗi
    • B. Kí tự
    • C. Số nguyên
    • D. Hằng
  • Câu 4:

    Câu lệnh sau cho kết quả là gì? Write(‘5’,+,’6’)

  • Câu 5:

    Câu lệnh Readln; mang ý nghĩa gì?

    • A. Nhập giá trị cho biến
    • B. Xuất giá trị của biến
    • C. Tạm dừng chương trình để xem kết quả
    • D. Câu lệnh thiếu.
  • Câu 6:

    Tổ hợp phím CTRL + F9 có chức năng gì?

    • A. Xem màn hình kết quả
    • B. Chạy chương trình
    • C. Thóat khỏi Pascal
    • D. Dịch chương trình.
  • Câu 7:

    Khai báo sau có ý nghĩa gì?

    Var a: integer; b: Char;

    • A. Biến a thuộc kiểu dữ liệu số thực và biến b thuộc kiểu dữ liệu kí tự
    • B. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu xâu
    • C. Biến a thuộc kiểu dữ liệu số nguyên và biến b thuộc kiểu dữ liệu kí tự
    • D. Các câu trên đều sai.
  • Câu 8:

    Câu lệnh: a:=a+1; có ý nghĩa gì?

    • A. Gán giá trị biến a cho a rồi cộng thêm 1 đơn vị
    • B. Giá trị a cộng thêm 1 đơn vị rồi gán cho biến a
    • C. Câu a và b sai
    • D. Câu a và b đúng.
  • Câu 9:

    Sau khi thực hiện đọan lệnh: Begin c:=a; a:=b; b:=c; End; Kết quả là gì?

    • A. Hoán đổi giá trị của hai biến a, c
    • B. Hoán đổi giá trị của hai biến a, c
    • C. Hoán đổi giá trị của hai biến b, c
    • D. Hoán đổi giá trị của hai biến b, c
  • Câu 10:

    Biến là gì?

    • A. Là đại lượng có giá trị không thay đổi trong quá trình thực hiện chương trình
    • B. Là đại lượng có giá trị luôn thay đổi trong quá trình thực hiện chương trình
    • C. Là đại lượng dùng để tính tốn
    • D. Là đại lượng dùng để khai báo tên chương
  • Câu 11:

    Tìm một điểm sai trong đoạn khai báo sau:

    Const lythuongkiet :=2010;

    • A. Dư dấu bằng (=)
    • B. Dư dấu hai chấm (:)
    • C. Tên hằng không được quá 8 kí tự.
    • D. Từ khóa khai báo hằng sai.
  • Câu 12:

    Hãy chỉ ra tên chương trình đặt sai trong các tên dưới đây:

    • A. Program baitap1;
    • B. Program bai tap1;
    • C. Program 1_baitap1;
    • D. Câu b và c sai
  • Câu 13:

    Trong chương trình Turbo Pascal từ khoá dùng để khai báo tên chương trình là:

    • A. Uses
    • B. Begin
    • C. Program
    • D. End
  • Câu 14:

    Một thuật toán chỉ có thể giải được bao nhiêu bài toán:

    • A. 1
    • B. 2
    • C. 3
    • D. nhiều
  • Câu 15:

    Cách khai báo hằng đúng là:

    • A. Const pi:=3,14 real;
    • B. Const pi: 3,14;
    • C. Const pi=3,14;
    • D. Const pi=3,14 real;
  • Câu 16:

    Cấu trúc rẽ nhánh có mấy dạng? Hãy viết biểu thức và vẽ sơ đồ các dạng cấu trúc rẽ nhánh.

  • Câu 17:

    chương trình nhập vào 1 số nguyên từ bàn phím, cho biết số nhập vào là số chẵn hay số lẻ (Dùng If ... Then ... Els

2
14 tháng 12 2019

Câu 1: B

Câu 2: D

Câu 3: D

Câu 4: Thông báo lỗi

Câu 5: C

Câu 6: B

Câu 7: C

Câu 8: D

Câu 9: Hoán đổi giá trị hai biến a và b nhé bạn

Câu 10: B

Câu 11: B

Câu 12: D

Câu 13: C

Câu 14: A

Câu 15: C

Câu 16:

-Cấu trúc rẽ nhánh có 2 dạngCâu 17
uses crt;

var a:integer;

begin

clrscr;

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

if a mod 2=0 then writeln(a,' la so chan')

else writeln(a,' la so le');

readln;

end.

14 tháng 12 2019

C1: A

C2: D

C3: D

C4: báo lỗi

C5: C

C6: B

C7: C

C8: D

C9: Hoán đổi gt biến a và b

C10: B

C11: B

C12: D

C13: C

C14: A

C15: C

C16

- Cấu trúc rẽ nhánh có 2 loại

Hỏi đáp Tin học

C17

Hỏi đáp Tin học

15 tháng 12 2017

program bai12;

uses crt;

var

begin

clrcr;

write('Nhap mot so N= ');readln(n);

if n>10 then writeln(n,'>10');

if n<10 then writeln(n,'<10');

readln

end.

uses crt;
var a:array[1..10000]of integer;
n,i,t,dem:integer;
begin
clrscr;
repeat
write('nhap n='); readln(n);
until (0<n) and (n<10000);
for i:=1 to n do
begin
repeat
write('a[',i,']='); readln(a[i]);
until (a[i]<=109);
end;
t:=0;
dem:=0;
for i:=1 to n do
if a[i]<0 then
begin
t:=t+a[i];
inc(dem);
end;
writeln('Trung binh cong cac so am la: ',t/dem:4:2);
readln;
end.

6 tháng 11 2018

- Bước 1: Ở bước này giá trị của x sẽ bằng x cộng với y: x= x+y.

- Bước 2: Tiếp đến giá trị của y bằng giá trị của x – y: y= x (bước 1)-y= x+y-y= x.

- Bước 3: Cuối cùng giá trị của x bằng x-y: x=x(bước1)-y(bước 2)= x+y-x=y.

Vậy kết quả của thuật toán là x=y và y=x

10 tháng 2 2020

- Bước 1: Ở bước này giá trị của x sẽ bằng x cộng với y: x= x+y.

- Bước 2: Tiếp đến giá trị của y bằng giá trị của x – y: y= x (bước 1)-y= x+y-y= x.

- Bước 3: Cuối cùng giá trị của x bằng x-y: x=x(bước1)-y(bước 2)= x+y-x=y.

Vậy kết quả của thuật toán là x=y và y=x

2 tháng 5 2021

Mình chỉ viết được pascal được không?

26 tháng 11 2019

uses crt;
const fi='standard.inp';
fo='standard.out';
var f1,f2:text;
a:array[1..100]of integer;
i,j,n,dem,t:integer;
begin
clrscr;
assign(f1,fi); reset(f1);
assign(f2,fo); rewrite(f2);
readln(f1,n);
for i:=1 to n do
readln(f1,a[i]);
{--------------------xu-ly------------------}
for i:=1 to n do
begin
write(f2,a[i],' co so uoc la: ');
dem:=0;
t:=0;
for j:=1 to a[i] do
if a[i] mod j=0 then
begin
dem:=dem+1;
t:=t+j;
end;
writeln(f2,dem.,' tong uoc la: ',t);
end;
close(f1);
close(f2);
readln;
end.

27 tháng 11 2019

làm như vầy nó chấm sai đó nha

15 tháng 5 2021

uses crt;

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

begin

write('nhap do dai day');readln(n);

for i:=1 to n do begin writeln('a[',i,']');readln(a[i]);

if a[i] mod 2= 0 then write('so duong ', a[i],' ');end;

readln

end.

2 tháng 4 2019

program crtg;

uses crt;

var n,i, j: integer;

A: array[1..1000] of byte;

tb: integer;

min,max: byte;

begin

clrscr;

writeln('Nhap do dai day A: '); read(n);

writeln('Nhap cac phan tu cua day: ');

for i:=1 to n do

begin

writeln('a[',i,'] = ');

repeat

read(a[i]);

until a < 100;

end;

for i:= 1 to n do

begin

if a[i] <> 1 then

begin

j:= 2;

while (a[i] mod j <> 0) do j:=j+1;

if j = a[i] then write(a[i]',');

end;

end;

tb:=0;

for i:=1 to n do

tb:=tb+a[i];

tb:=tb/n;

writeln('Gia tri trung binh cua day tren la: ',tb);

max:=a[1]; min:=a[1];

for i:=2 to n do

begin

if a[i] < min then min:=a[i];

if a[i] > max then max:=a[i];

end;

writeln('Gia tri lon nhat cua day la ',max);

writeln('Gia tri nho nhat cua day la ',min);

readln

end.