Xác định Input,output,nêu Thuật Toán,viết Chương Trình Nhập Vào Một ...

Có thể bạn quan tâm

Tìm×

Tìm kiếm với hình ảnh

Vui lòng chỉ chọn một câu hỏi

Tìm đáp án

- Đăng nhập
- |
- Đăng ký

Hoidap247.com Nhanh chóng, chính xác

Hãy đăng nhập hoặc tạo tài khoản miễn phí!

Đăng nhậpĐăng ký

Đặt câu hỏi

logo

Lưu vào

+
Danh mục mới

Lưu

Kramaric
Chưa có nhóm

Trả lời
7
Điểm
10
Cảm ơn
0

Tin Học
Lớp 8
10 điểm
Kramaric - 21:30:43 12/12/2020

Câu 1: Xác định input,output,nêu thuật toán,viết chương trình nhập vào một số nguyên từ bàn phím, kiểm tra xem số đó chẵn hay lẻ? Câu 2: Xác định input, output,nêu thuật toán, viết chương trình nhập vào chiều dài, chiều rộng hình chữ nhật , tính chu vi, diện tích và in kết quả ra màn hình? Câu 3: Xác định input,output, nêu thuật toán, viết chương trình nhập vào một số nguyên từ bàn phím, kiểm tra xem số đó âm hay dương?

Hỏi chi tiết
Báo vi phạm

Hãy luôn nhớ cảm ơn và vote 5* nếu câu trả lời hữu ích nhé!

TRẢ LỜI

Yonnii
Only Once (O2)

Trả lời
4770
Điểm
86419
Cảm ơn
7993

Yonnii

13/12/2020

Câu 1:

In: Số nguyên n.

Out: Số nguyên n là số chẵn hay lẻ.

MTTT:

B1: Nếu n mod 2 = 0 thì thông báo 'n la so chan' ngược lại thông báo 'n la so le'

B2: KTTT

VCT:

program ctpt;

uses crt;

var n: integer;

begin

clrscr;

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

if n mod 2 = 0 then write(n, ' la so chan') else write(n, ' la so le');

readln

end.

Câu 2:

In: Chiều dài (a), chiều rộng (b)

Out: Chu vi (C), diện tích (S)

MTTT:

B1: C←(a+b)*2

B2: S←a*b

B3: Thông báo C, S và KTTT

VCT

program ctpt;

uses crt;

var a, b, C, S: real;

begin

clrscr;

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

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

C:=(a+b)*2;

S:=a*b;

writeln('Chu vi hinh chu nhat la: ', C:2:1);

writeln('Dien tich hinh chu nhat la: ', S:2:1);

readln

end.

Câu 3:

In: Số nguyên a.

Out: Số nguyên a là số dương hay âm.

MTTT:

B1: Nếu a>0 thì thông báo 'a la so duong' ngược lại nếu a<0 thì thông báo 'a la so am' ngược lại thì thông báo 'a khong la so duong hay am'

B2: KTTT.

VCT:

progra ctpt;

uses crt;

var: a: integer;

begin

clrscr;

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

if a>0 then write(a, ' la so duong') else

if a<0 then write(a, ' la so am') else

write(a, ' khong la so duong hay am');

readln

end.

Hãy giúp mọi người biết câu trả lời này thế nào?

starstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarstarGửiHủy

Cảm ơn
Báo vi phạm

Đăng nhập để hỏi chi tiết

keyy
_Interesting_

Trả lời
1742
Điểm
375
Cảm ơn
1315

keyy

13/12/2020

Câu 1:

Input: Số n

Output: Số n chẵn hay lẽ

Thuật toán:

Bước 1: Nhập n

Bước 2:

2.1: Nếu n mod 2 = 0 thì thông báo chẵn và thực hiện bước 3

2.2: Nếu n mod 2 <> 0 thì thông báo lẻ và thực hiện bước 3

Bước 3: Kết thúc chương trình

Chương trình:

Program NN;Uses crt;Var n: longint;Begin Clrscr; Write('Nhap n: '); Readln(n); If n mod 2 = 0 then Write('Chan') Else Write('Le'); ReadlnEnd.

Câu 2:

Input: Chiều dài, chiều rộng của HCN

Output: Chu vi và diện tích HCN

Thuật toán:

Bước 1: Nhập cd, cr

Bước 2:

2.1: s<-cd*cr;

2.2: p<-(cd+cr)*2;

Bước 3: Xuất cd và cr ra màn hình

Chương trình:

Program NN;Uses crt;Var cr,cd,s,p: real;Begin Clrscr; Write('Nhap chieu dai va chieu rong: '); Readln(cd,cr); s:=cd*cr; p:=(cd+cr)*2; Writeln('S = ',s:0:2); Write('P = ',p:0:2); ReadlnEnd.

Câu 3:

Input: Số n

Output: Số n âm hay dương

Thuật toán:

Bước 1: Nhập n

Bước 2:

2.1: Nếu n > 0 thì thông báo dương và thực hiện bước 3

2.2: Nếu n < 0 thì thông báo âm và thực hiện bước 3

3.3: Nếu n = 0 thì thông báo không âm không dương và thực hiện bước 3

Bước 3: Kết thúc chương trình

Chương trình:

Program NN;Uses crt;Var n: longint;Begin Clrscr; Write('Nhap n: '); Readln(n); If n > 0 then Write('Duong') Else If n < 0 then Write('Am');